1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-31 04:04:49 +00:00
cc65/libsrc/runtime/shrax4.s

23 lines
234 B
ArmAsm
Raw Normal View History

;
; Ullrich von Bassewitz, 25.07.2001
;
; CC65 runtime: Scale the primary register by 16
;
.export shrax4
.importzp tmp1
shrax4: stx tmp1
lsr tmp1
ror a
lsr tmp1
ror a
lsr tmp1
ror a
lsr tmp1
ror a
ldx tmp1
rts