1
0
mirror of https://github.com/cc65/cc65.git synced 2025-08-20 09:28:18 +00:00

Remove/cleanup

git-svn-id: svn://svn.cc65.org/cc65/trunk@825 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2001-07-26 20:08:10 +00:00
parent bbebbe3a1b
commit 2dd227534f
4 changed files with 10 additions and 38 deletions

View File

@@ -170,7 +170,6 @@ OBJS = add.o \
shreax3.o \ shreax3.o \
shreax4.o \ shreax4.o \
staspidx.o \ staspidx.o \
staspp.o \
staxsp.o \ staxsp.o \
staxspi.o \ staxspi.o \
staxspp.o \ staxspp.o \

View File

@@ -4,15 +4,16 @@
; CC65 runtime: Load a indirect from address in ax ; CC65 runtime: Load a indirect from address in ax
; ;
.export ldai, ldaidx .export ldaidx
.importzp ptr1 .importzp ptr1
ldai: ldy #$00 .proc ldaidx
ldaidx: sta ptr1 sta ptr1
stx ptr1+1 stx ptr1+1
ldx #$00 ldx #$00
lda (ptr1),y lda (ptr1),y
bpl L9 bpl @L1
dex dex
L9: rts @L1: rts
.endproc

View File

@@ -4,15 +4,13 @@
; CC65 runtime: Load a unsigned indirect from address in ax ; CC65 runtime: Load a unsigned indirect from address in ax
; ;
.export ldaui, ldauidx .export ldauidx
.importzp ptr1 .importzp ptr1
ldaui: .proc ldauidx
ldy #0
ldauidx:
sta ptr1 sta ptr1
stx ptr1+1 stx ptr1+1
ldx #0 ldx #0
lda (ptr1),y lda (ptr1),y
rts rts
.endproc

View File

@@ -1,26 +0,0 @@
;
; Ullrich von Bassewitz, 25.10.2000
;
; CC65 runtime: Store a indirect into address at top of stack
;
.export staspp
.import incsp2
.importzp sp, ptr1
.proc staspp
ldy #1
pha
lda (sp),y
sta ptr1+1
dey
lda (sp),y
sta ptr1
pla
sta (ptr1),y
jmp incsp2 ; Drop address
.endproc