Recode decsp8

git-svn-id: svn://svn.cc65.org/cc65/trunk@670 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/libsrc/runtime/decsp8.s b/libsrc/runtime/decsp8.s
index 54192fd5145755434a654aced3dedaa55150689c..0c0c8fee9e4743f58af9826c4d20b52773f967ca 100644 (file)
--- a/libsrc/runtime/decsp8.s
+++ b/libsrc/runtime/decsp8.s
@@ -5,16 +5,23 @@
 ;
 
                .export         decsp8
-       .import         subysp
+               .importzp       sp
 
 .proc  decsp8
 
-       ldy     #8
-       jmp     subysp
+       lda     sp
+       sec
+       sbc     #8
+       sta     sp
+       bcc     @L1
+       rts
+
+@L1:   dec     sp+1
+       rts
 
 .endproc
 
 
 
 
-       
+