This commit was generated by cvs2svn to compensate for changes in r2,

which included commits to RCS files with non-trunk default branches. git-svn-id: svn://svn.cc65.org/cc65/trunk@3 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-05-28 13:40:48 +00:00
parent 579491e8a4
commit 53dd513176
847 changed files with 91345 additions and 0 deletions
--- a/libsrc/runtime/leaysp.s
+++ b/libsrc/runtime/leaysp.s
@@ -0,0 +1,33 @@
+;
+; Ullrich von Bassewitz, 21.08.1998
+;
+; CC65 runtime: Load effective address with offset in Y relative to SP
+;
+
+    	.export		lea0sp, leaysp, plea0sp, pleaysp
+	.import		pushax
+	.importzp	sp
+
+lea0sp:	ldy	#0   		; Load offset zero
+leaysp:	tya
+	ldx	sp+1		; Get high byte
+ 	clc
+	adc	sp
+   	bcc	L8
+   	inx
+L8:	rts
+
+
+plea0sp:
+	ldy	#0
+pleaysp:
+  	tya
+  	ldx	sp+1		; Get high byte
+  	clc
+  	adc	sp
+   	bcc	L9
+   	inx
+L9:	jmp	pushax
+
+
+