Added entry points for ANSI C
This commit is contained in:
34
mach/ns/libsys/_wait.s
Normal file
34
mach/ns/libsys/_wait.s
Normal file
@@ -0,0 +1,34 @@
|
||||
.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
|
||||
Reference in New Issue
Block a user