newlib-cygwin/newlib/libc/machine/w65/smulhi3.S

21 lines
153 B
ArmAsm
Raw Normal View History

2000-02-18 03:39:52 +08:00
.global ___smulhi3
___smulhi3:
lda #0
mult1: ldx <r4
beq done
lsr <r4
bcc mult2
clc
adc <r5
mult2: asl <r5
bra mult1
done: sta <r0
rtl