1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-18 00:07:21 +00:00
cc65/libsrc/runtime/aslax4.s

23 lines
380 B
ArmAsm

;
; Ullrich von Bassewitz, 25.07.2001
;
; CC65 runtime: Scale the primary register by 16
;
.export aslax4, shlax4
.importzp tmp1
aslax4:
shlax4: stx tmp1
asl a
rol tmp1
asl a
rol tmp1
asl a
rol tmp1
asl a
rol tmp1
ldx tmp1
rts