]> git.sur5r.net Git - cc65/blobdiff - libsrc/runtime/decsp3.s
Cleaning telestrat.cfg (no need to have bashead segment). Some primitives added
[cc65] / libsrc / runtime / decsp3.s
index 0b81bea7c43a2510b26fd4ddad93a7f103cf6026..a3ad7777eac53cea7abcf161f2a528d2842d461f 100644 (file)
@@ -4,17 +4,24 @@
 ; CC65 runtime: Decrement the stackpointer by 3
 ;
 
-               .export         decsp3
-       .import         subysp
+        .export         decsp3
+        .importzp       sp
 
-.proc  decsp3
+.proc   decsp3
 
-       ldy     #3
-       jmp     subysp
+        lda     sp
+        sec
+        sbc     #3
+        sta     sp
+        bcc     @L1
+        rts
+
+@L1:    dec     sp+1
+        rts
 
 .endproc
 
 
 
 
-       
+