Recode decsp8

git-svn-id: svn://svn.cc65.org/cc65/trunk@670 b7a2c559-68d2-44c3-8de9-860c34a00d81
2001-03-26 14:41:45 +00:00
parent b4da972eb7
commit 092c0a2620
1 changed files with 11 additions and 4 deletions
--- 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




-	
+