26 lines
285 B
ArmAsm
26 lines
285 B
ArmAsm
|
.define _ptrace
|
||
|
.extern _ptrace
|
||
|
.text
|
||
|
_ptrace:
|
||
|
enter[], 0
|
||
|
xord @_errno,@_errno
|
||
|
addr 8(fp),r7
|
||
|
movd 16,r0
|
||
|
addd r0,r7
|
||
|
1:
|
||
|
subd 4,r7
|
||
|
movd 0(r7),tos
|
||
|
acbd -4,r0,1b
|
||
|
movd 26,tos
|
||
|
jsr @.mon
|
||
|
cmpqd 0,tos
|
||
|
beq I0011
|
||
|
movd tos,r7
|
||
|
movd r7,@_errno
|
||
|
movd -1,tos
|
||
|
I0011:
|
||
|
movd tos,r7
|
||
|
movd r7,r4
|
||
|
exit []
|
||
|
ret 0
|