1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-23 04:30:10 +00:00
cc65/libsrc/runtime/shreax3.s

27 lines
479 B
ArmAsm

;
; Ullrich von Bassewitz, 06.08.1998
;
; CC65 runtime: Scale the 32 bit primary register by 8
;
.export shreax3
.importzp sreg, tmp1
shreax3:
stx tmp1
lsr sreg+1
ror sreg
ror tmp1
ror a
lsr sreg+1
ror sreg
ror tmp1
ror a
lsr sreg+1
ror sreg
ror tmp1
ror a
ldx tmp1
rts