RosettaCodeData/Task/Concurrent-computing/Haskell/concurrent-computing-1.hs
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

6 lines
175 B
Haskell

import Control.Concurrent
main = mapM_ forkIO [process1, process2, process3] where
process1 = putStrLn "Enjoy"
process2 = putStrLn "Rosetta"
process3 = putStrLn "Code"