9 lines
133 B
Text
9 lines
133 B
Text
|
procedure main()
|
||
|
|
if (fork()|runerr(500)) = 0 then
|
||
|
|
write("child")
|
||
|
|
else {
|
||
|
|
delay(1000)
|
||
|
|
write("parent")
|
||
|
|
}
|
||
|
|
end
|