Splitted the push.s module

git-svn-id: svn://svn.cc65.org/cc65/trunk@397 b7a2c559-68d2-44c3-8de9-860c34a00d81
2026-04-25 22:18:27 +00:00 · 2000-10-26 20:43:54 +00:00
parent 826a9545e4
commit 4a7642e98c
15 changed files with 286 additions and 84 deletions
@@ -0,0 +1,25 @@
+;
+; Ullrich von Bassewitz, 26.10.2000
+;
+; CC65 runtime: Push value in a onto the stack
+;
+
+       	.export	  	pushaysp, pusha
+	.importzp	sp
+
+; Beware: The optimizer knows about this function!
+
+pushaysp:
+	lda	(sp),y
+pusha:	ldy	sp
+       	beq	@L1
+ 	dec	sp
+    	ldy	#0
+    	sta	(sp),y
+    	rts
+
+@L1:	dec	sp+1
+    	dec	sp
+    	sta	(sp),y
+    	rts
+