*** empty log message ***

This commit is contained in:
keie
1985-01-01 22:27:02 +00:00
parent d16efbab98
commit c235c1a93d
63 changed files with 992 additions and 0 deletions

21
lang/cem/libcc/mon/fork.e Normal file
View File

@@ -0,0 +1,21 @@
#
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