Add tasks for all the new languages

2016-12-05 23:44:36 +01:00 · 2016-12-05 23:44:36 +01:00 · bba7bfd280
commit bba7bfd280
parent 9dc3c2bb62
13208 changed files with 134745 additions and 0 deletions
--- a/Task/Concurrent-computing/Phix/concurrent-computing.phix
+++ b/Task/Concurrent-computing/Phix/concurrent-computing.phix
@ -0,0 +1,15 @@
+procedure echo(string s)
+    sleep(rand(100)/100)
+    enter_cs()
+    puts(1,s)
+    puts(1,'\n')
+    leave_cs()
+end procedure
+
+constant threads = {create_thread(routine_id("echo"),{"Enjoy"}),
+                    create_thread(routine_id("echo"),{"Rosetta"}),
+                    create_thread(routine_id("echo"),{"Code"})}
+
+wait_thread(threads)
+puts(1,"done")
+{} = wait_key()