;
; Ullrich von Bassewitz, 06.08.1998
;
; CC65 runtime: Scale the 32 bit primary register by 8
;
.export asleax3, shleax3
.importzp sreg, tmp1
asleax3:
shleax3:
stx tmp1
asl a
rol tmp1
rol sreg
rol sreg+1
asl a
rol tmp1
rol sreg
rol sreg+1
asl a
rol tmp1
rol sreg
rol sreg+1
ldx tmp1
rts
asleax3.s.html; generated on Sat Oct 13 22:41:33 2001 by ca65html