35 lines
363 B
ArmAsm
35 lines
363 B
ArmAsm
.define _wait
|
|
.sect .text
|
|
.sect .rom
|
|
.sect .data
|
|
.sect .bss
|
|
.sect .text
|
|
.extern _wait
|
|
.sect .text
|
|
_wait:
|
|
enter[], 0
|
|
movd 7,tos
|
|
jsr @.mon
|
|
cmpqd 0,tos
|
|
bne I0011
|
|
cmpqd 0,8(fp)
|
|
beq I0012
|
|
movd tos,r7
|
|
movd r7,0(8(fp))
|
|
movd tos,r6
|
|
movd r6,r4
|
|
exit []
|
|
ret 0
|
|
I0012:
|
|
adjspd -4
|
|
movd tos,r7
|
|
movd r7,r4
|
|
exit []
|
|
ret 0
|
|
I0011:
|
|
movd tos,r7
|
|
movd r7,@_errno
|
|
movd -1,r4
|
|
exit []
|
|
ret 0
|