Anonymous user
Fork: Difference between revisions
no edit summary
(→{{header|Perl}}: simpler examples) |
No edit summary |
||
Line 151:
forkProcess (putStrLn "This is the new process")
putStrLn "This is the original process"</lang>
=={{header|HicEst}}==
<lang hicest>SYSTEM( RUN )
WRITE(Messagebox='?Y', IOStat=ios) "Another Fork?"
IF(ios == 2) ALARM(999) ! quit immediately
! assume this script is stored as 'Fork.hic'
SYSTEM(SHell='Fork.hic')
BEEP("c e g 'c")
WRITE(Messagebox="!") "Waiting ..."
ALARM(999) ! quit immediately </lang>
=={{header|OCaml}}==
| |||