about summary refs log tree commit diff stats
path: root/archive/0.vm.arc/fork.mu
diff options
context:
space:
mode:
Diffstat (limited to 'archive/0.vm.arc/fork.mu')
-rw-r--r--archive/0.vm.arc/fork.mu18
1 files changed, 18 insertions, 0 deletions
diff --git a/archive/0.vm.arc/fork.mu b/archive/0.vm.arc/fork.mu
new file mode 100644
index 00000000..8d6463a8
--- /dev/null
+++ b/archive/0.vm.arc/fork.mu
@@ -0,0 +1,18 @@
+(function main [
+  (fork thread2:fn)
+  (default-space:space-address <- new space:literal 2:literal)
+  (x:integer <- copy 34:literal)
+  { begin
+    (print-integer nil:literal/terminal x:integer)
+    (loop)
+  }
+])
+
+(function thread2 [
+  (default-space:space-address <- new space:literal 2:literal)
+  (y:integer <- copy 35:literal)
+  { begin
+    (print-integer nil:literal/terminal y:integer)
+    (loop)
+  }
+])