mirror of
https://github.com/cc65/cc65.git
synced 2024-12-25 02:29:52 +00:00
Remove/cleanup
git-svn-id: svn://svn.cc65.org/cc65/trunk@825 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
bbebbe3a1b
commit
2dd227534f
@ -170,7 +170,6 @@ OBJS = add.o \
|
||||
shreax3.o \
|
||||
shreax4.o \
|
||||
staspidx.o \
|
||||
staspp.o \
|
||||
staxsp.o \
|
||||
staxspi.o \
|
||||
staxspp.o \
|
||||
|
@ -4,15 +4,16 @@
|
||||
; CC65 runtime: Load a indirect from address in ax
|
||||
;
|
||||
|
||||
.export ldai, ldaidx
|
||||
.export ldaidx
|
||||
.importzp ptr1
|
||||
|
||||
ldai: ldy #$00
|
||||
ldaidx: sta ptr1
|
||||
.proc ldaidx
|
||||
sta ptr1
|
||||
stx ptr1+1
|
||||
ldx #$00
|
||||
lda (ptr1),y
|
||||
bpl L9
|
||||
bpl @L1
|
||||
dex
|
||||
L9: rts
|
||||
@L1: rts
|
||||
.endproc
|
||||
|
||||
|
@ -4,15 +4,13 @@
|
||||
; CC65 runtime: Load a unsigned indirect from address in ax
|
||||
;
|
||||
|
||||
.export ldaui, ldauidx
|
||||
.export ldauidx
|
||||
.importzp ptr1
|
||||
|
||||
ldaui:
|
||||
ldy #0
|
||||
ldauidx:
|
||||
|
||||
.proc ldauidx
|
||||
sta ptr1
|
||||
stx ptr1+1
|
||||
ldx #0
|
||||
lda (ptr1),y
|
||||
rts
|
||||
|
||||
.endproc
|
||||
|
@ -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
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user