newlib-cygwin/newlib/libc/machine/w65/udivhi3.s

31 lines
223 B
ArmAsm
Raw Normal View History

2000-02-18 03:39:52 +08:00
.global ___udivhi3
___udivhi3:
stz <r0
ldy #1
ldx <r4
lda <r5
div1:
asl a
bcs div2
iny
cpy #17
bne div1
div2: ror a
div4: pha
txa
sec
sbc 1,s
bcc div3
tax
div3: rol <r0
pla
lsr a
dey
bne div4
rtl