ack/plat/em/libsys/fork.e
David Given 7eaa235fd1 Bodge the ancient em monitor library into building as a libsys for the em22
plat. It's completely untested, but it builds and makes e.out executables.
2018-06-13 21:44:25 +09:00

22 lines
195 B
Plaintext

#
mes 2,EM_WSIZE,EM_PSIZE
exa par_uid
par_uid
bss EM_WSIZE,0,0
exp $fork
pro $fork,0
loc 2
mon
zeq *1
ste errno
loc -1
ret EM_WSIZE
1
zeq *2
ste par_uid
loc 0
2
ret EM_WSIZE
end