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/lxor.s
+++ b/libsrc/runtime/lxor.s
@@ -1,5 +1,6 @@
 ;
 ; Ullrich von Bassewitz, 06.08.1998
+; Christian Krueger, 11-Mar-2017, added 65SC02 optimization
 ;
 ; CC65 runtime: xor on longs
 ;
@@ -8,16 +9,28 @@
        .import         addysp1
        .importzp       sp, sreg, tmp1

+        .macpack        cpu
+
 tosxor0ax:
+.if (.cpu .bitand ::CPU_ISET_65SC02)
+        stz     sreg
+        stz     sreg+1
+.else
        ldy     #$00
        sty     sreg
        sty     sreg+1
+.endif

-tosxoreax:                         
+tosxoreax:
+.if (.cpu .bitand ::CPU_ISET_65SC02)
+        eor     (sp)            ; byte 0
+        ldy     #1
+.else                         
        ldy     #0
        eor     (sp),y          ; byte 0
-        sta     tmp1
        iny
+.endif
+        sta     tmp1
        txa
        eor     (sp),y          ; byte 1
        tax