RosettaCodeData/Task/Fork/Standard-ML/fork.ml
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

3 lines
134 B
Standard ML

case Posix.Process.fork () of
SOME pid => print "This is the original process\n"
| NONE => print "This is the new process\n";