few 6502 and some 65SC02 optimizations

2017-03-12 23:21:43 +01:00
parent 0ec4534bd6
commit 0de44517ac
23 changed files with 272 additions and 78 deletions
--- a/libsrc/runtime/swap.s
+++ b/libsrc/runtime/swap.s
@@ -1,5 +1,6 @@
 ;
 ; Ullrich von Bassewitz, 06.08.1998
+; Christian Krueger, 11-Mar-2017, added 65SC02 optimization
 ;
 ; CC65 runtime: swap ax with TOS
 ;
@@ -7,6 +8,8 @@
        .export         swapstk
        .importzp       sp, ptr4

+        .macpack        cpu
+
 swapstk:
        sta     ptr4
        stx     ptr4+1
@@ -15,11 +18,18 @@ swapstk:
        tax
        lda     ptr4+1
        sta     (sp),y
+.if (.cpu .bitand ::CPU_ISET_65SC02)
+        lda     (sp)
+        tay
+        lda     ptr4
+        sta     (sp)
+        tya    
+.else        
        dey
        lda     (sp),y
        pha
        lda     ptr4
        sta     (sp),y
        pla
+.endif        
        rts                     ; whew!
-