ack/mach/xenix3/libsys/_fork.s
1990-01-19 17:37:29 +00:00

21 lines
250 B
ArmAsm

.sect .text; .sect .rom; .sect .data; .sect .bss
.define __fork, _par_uid
.sect .bss
.comm _par_uid, 2
.sect .text
__fork:
mov ax,2
call syscal
jb 1f
and bx,bx
je 2f
ret
1:
mov (_errno),ax
mov ax,-1
ret
2:
mov (_par_uid),ax
xor ax,ax
ret