Module split

git-svn-id: svn://svn.cc65.org/cc65/trunk@423 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-10-31 18:57:00 +00:00
parent 12026ee98a
commit 4680e36ad0
3 changed files with 32 additions and 16 deletions
--- a/libsrc/runtime/leasp.s
+++ b/libsrc/runtime/leasp.s
@@ -1,28 +1,20 @@
 ;
 ; Ullrich von Bassewitz, 21.08.1998
 ;
-; CC65 runtime: Load effective address with offset in Y relative to SP
+; CC65 runtime: Load effective address with offset in A relative to SP
 ;

-    	.export		leaasp, pleaasp
-     	.import		pushax
+    	.export		leaasp
     	.importzp	sp

-leaasp:	ldx	sp+1		; Get high byte
+.proc	leaasp
+
+	ldx	sp+1	      	; Get high byte
     	clc
     	adc	sp
-     	bcc	@L1
+     	bcc	@L9
     	inx
-@L1: 	rts
-
-
-pleaasp:
-  	ldx	sp+1		; Get high byte
-  	clc
-  	adc	sp
-   	bcc	L9
-   	inx
-L9:	jmp	pushax
-
+@L9: 	rts

+.endproc