Fork: Difference between revisions
Content added Content deleted
(→{{header|Perl}}: simpler examples) |
No edit summary |
||
| Line 151: | Line 151: | ||
forkProcess (putStrLn "This is the new process") |
forkProcess (putStrLn "This is the new process") |
||
putStrLn "This is the original process"</lang> |
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}}== |
=={{header|OCaml}}== |
||