More module splits

git-svn-id: svn://svn.cc65.org/cc65/trunk@393 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-10-25 19:53:22 +00:00
parent e3a8e6bbe4
commit dd0ddc94e3
25 changed files with 552 additions and 231 deletions
--- a/libsrc/runtime/addysp.s
+++ b/libsrc/runtime/addysp.s
@@ -0,0 +1,21 @@
+;
+; Ullrich von Bassewitz, 25.10.2000
+;
+; CC65 runtime: Increment the stackpointer by value in y
+;
+
+       	.export		addysp1, addysp
+	.importzp	sp
+
+addysp1:
+	iny
+addysp:	pha		       	; Save A
+ 	clc
+ 	tya		       	; Get the value
+ 	adc	sp	       	; Add low byte
+ 	sta	sp	       	; Put it back
+ 	bcc	@L1		; If no carry, we're done
+ 	inc	sp+1	       	; Inc high byte
+@L1:	pla		       	; Restore A
+ 	rts
+