aboutsummaryrefslogtreecommitdiff
path: root/examples/working-compiler/coroutine.test
blob: 9b5a6ef269850c079a9caed0f43008b6171f1b0d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
{ ==caller ==data
  "coroutine 1" dump data dump
  data caller 1 ! =caller =data
  "coroutine 2" dump data dump
  data caller 1 ! =caller =data
  "coroutine 3" dump data dump
  data caller 1 !
} !! ==cr

"data"
cr 1 ! --
"here 1" dump
cr 1 ! --
"here 2" dump
cr 1 ! --
"here 3" dump

0 sys .exit