Files
cc65/libsrc/runtime/regswap1.s
2025-06-04 02:06:40 +00:00

23 lines
503 B
ArmAsm

;
; Ullrich von Bassewitz, 25.11.2002
;
; CC65 runtime: Swap 1 byte of register variable space
;
.export regswap1
.importzp spc, regbank
.proc regswap1
lda regbank,x ; Get old value
pha ; Save it
lda (spc),y ; Get stack loc
sta regbank,x ; Store new value
pla
sta (spc),y ; Store old value
rts
.endproc