26 lines
295 B
ArmAsm
26 lines
295 B
ArmAsm
|
.define .cms
|
||
|
|
||
|
.text
|
||
|
|
||
|
.cms: movd tos, r7 !return addres
|
||
|
addr 4(sp), r1
|
||
|
movd r1, r2
|
||
|
addd 0(sp), r2
|
||
|
movd 0(sp), r0
|
||
|
muld -2, r0
|
||
|
subd 4, r0
|
||
|
3:
|
||
|
cmpd 0(r2), 0(r1)
|
||
|
bne 2f
|
||
|
addr 4(r1), r1
|
||
|
addr 4(r2), r2
|
||
|
acbd -4, 0(sp), 3b
|
||
|
xord r1, r1
|
||
|
4:
|
||
|
adjspd r0
|
||
|
movd r7, tos
|
||
|
ret 0
|
||
|
2:
|
||
|
movd 1, r1
|
||
|
br 4b
|