about summary refs log blame commit diff stats
path: root/fork.mu
blob: 316aa98aec00a17eaa4cd78f214904a39521cb1b (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

















                                                                    
(main
  (fork (thread2 fn))
  ((default-scope scope-address) <- new (scope literal) (2 literal))
  ((x integer) <- copy (34 literal))
  { begin
    (print-primitive (x integer))
    (continue)
  }
)

(thread2
  ((default-scope scope-address) <- new (scope literal) (2 literal))
  ((y integer) <- copy (35 literal))
  { begin
    (print-primitive (y integer))
    (continue)
  }
)