diff options
Diffstat (limited to 'archive/0.vm.arc/fork.mu')
-rw-r--r-- | archive/0.vm.arc/fork.mu | 18 |
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) + } +]) |