1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 02:29:52 +00:00
cc65/libsrc/runtime/mulax3.s

28 lines
395 B
ArmAsm

;
; Ullrich von Bassewitz, 04.10.2001
;
; CC65 runtime: Multiply the primary register
;
.export mulax3
.importzp ptr1
.proc mulax3
sta ptr1
stx ptr1+1
asl a
rol ptr1+1
clc
adc ptr1
pha
txa
adc ptr1+1
tax
pla
rts
.endproc