From: cuz Date: Sat, 10 Jun 2000 16:11:27 +0000 (+0000) Subject: Renamed module, part of code no longer needed X-Git-Tag: V2.12.0~3464 X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=78b07cc6f49df792ce2c934ad2843f0378acacf9;p=cc65 Renamed module, part of code no longer needed git-svn-id: svn://svn.cc65.org/cc65/trunk@48 b7a2c559-68d2-44c3-8de9-860c34a00d81 --- diff --git a/libsrc/runtime/Makefile b/libsrc/runtime/Makefile index d6024d1fa..ef202d2f9 100644 --- a/libsrc/runtime/Makefile +++ b/libsrc/runtime/Makefile @@ -18,7 +18,7 @@ OBJS = runtime.o mul.o div.o push.o inc.o dec.o shl.o shr.o add.o\ uge.o lt.o ult.o le.o ule.o eq.o ne.o test.o subeqsp.o\ udiv.o umod.o mod.o shelp.o aslax1.o asrax1.o shrax1.o\ aslax2.o asrax2.o shrax2.o aslax3.o asrax3.o shrax3.o\ - enter.o leave.o leaysp.o popsreg.o ldai.o ldaxi.o ldauisp.o\ + enter.o leave.o leasp.o popsreg.o ldai.o ldaxi.o ldauisp.o\ ldaui.o pushw.o pushb.o staxsp.o ldaxsp.o addeqsp.o\ bpushbsp.o pushwsp.o pushbsp.o diff --git a/libsrc/runtime/leasp.s b/libsrc/runtime/leasp.s new file mode 100644 index 000000000..4f9320881 --- /dev/null +++ b/libsrc/runtime/leasp.s @@ -0,0 +1,31 @@ +; +; Ullrich von Bassewitz, 21.08.1998 +; +; CC65 runtime: Load effective address with offset in Y relative to SP +; + + .export leaasp, plea0sp, pleaysp + .import pushax + .importzp sp + +leaasp: ldx sp+1 ; Get high byte + clc + adc sp + bcc @L1 + inx +@L1: rts + + +plea0sp: + ldy #0 +pleaysp: + tya + ldx sp+1 ; Get high byte + clc + adc sp + bcc L9 + inx +L9: jmp pushax + + + diff --git a/libsrc/runtime/leaysp.s b/libsrc/runtime/leaysp.s deleted file mode 100644 index 2e5c16174..000000000 --- a/libsrc/runtime/leaysp.s +++ /dev/null @@ -1,33 +0,0 @@ -; -; 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 - - -