RosettaCodeData/Task/Fork/Peri/fork.peri
2023-07-01 13:44:08 -04:00

13 lines
231 B
Text

###sysinclude standard.uh
###sysinclude system.uh
#g
."Start!\n"
§child fork sto childpid
@childpid wait
@childpid ."This was the child pid: " printnl
end
child: ."I am the child!\n"
#d 3.14 printnl
2 sleep
end
{ „childpid” }