Concurrent computing: Difference between revisions

Content deleted Content added
Jafar (talk | contribs)
No edit summary
Jafar (talk | contribs)
No edit summary
Line 455: Line 455:
process2 = putStrLn "Rosetta"
process2 = putStrLn "Rosetta"
process3 = putStrLn "Code"</lang>
process3 = putStrLn "Code"</lang>

==Icon and {{header|Unicon}}==
The following code uses features exclusive to Unicon
<lang unicon>procedure main()
L:=[ create write("Enjoy"), create write("Rosetta"), create write("Code")]
every thread(!L)
every join(!L)
end</lang>


=={{header|J}}==
=={{header|J}}==
Line 790: Line 798:
after 1200 ;# Give threads time to do their work
after 1200 ;# Give threads time to do their work
exit</lang>
exit</lang>

=={{header|Unicon}}==
<lang unicon>procedure main()
L:=[ create write("Enjoy"), create write("Rosetta"), create write("Code")]
every thread(!L)
every join(!L)
end</lang>


=={{header|UnixPipes}}==
=={{header|UnixPipes}}==