mirror of
https://github.com/cc65/cc65.git
synced 2024-10-30 12:28:25 +00:00
b4da972eb7
git-svn-id: svn://svn.cc65.org/cc65/trunk@669 b7a2c559-68d2-44c3-8de9-860c34a00d81
24 lines
300 B
ArmAsm
24 lines
300 B
ArmAsm
;
|
|
; Ullrich von Bassewitz, 21.08.1998
|
|
;
|
|
; CC65 runtime: Load effective address with offset in A relative to SP and push it
|
|
;
|
|
|
|
.export pleaasp
|
|
.import pushax
|
|
.importzp sp
|
|
|
|
.proc pleaasp
|
|
|
|
ldx sp+1 ; Get high byte
|
|
clc
|
|
adc sp
|
|
bcc @L9
|
|
inx
|
|
@L9: jmp pushax
|
|
|
|
.endproc
|
|
|
|
|
|
|