1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 02:29:52 +00:00
cc65/libsrc/runtime/popa.s
cuz dd0ddc94e3 More module splits
git-svn-id: svn://svn.cc65.org/cc65/trunk@393 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-10-25 19:53:22 +00:00

22 lines
210 B
ArmAsm

;
; Ullrich von Bassewitz, 25.10.2000
;
; CC65 runtime: Pop a from stack
;
.export popa
.importzp sp
.proc popa
ldy #0
lda (sp),y ; Read byte
inc sp
bne @L1
inc sp+1
@L1: rts
.endproc