<script> Constants:
00: "begin root"
01: Fn(new(_) block argument)
<script> Code:
00 (ln 1): Load(Module, Class("Fiber"))
01 (ln 1): Call(current)
02 (ln 1): Store(Module)
03 (ln 1): Pop
04 (ln 2): Load(Module, Class("System"))
05 (ln 2): Constant(0: "begin root")
06 (ln 2): Call(print(_))
07 (ln 2): Pop
08 (ln 4): Load(Module, Class("Fiber"))
09 (ln 8): Closure(1, [])
10 (ln 8): Call(new(_))
11 (ln 8): Call(transfer())
12 (ln 8): Pop
13 (ln 9): EndModule
14 (ln 9): Return
15 (ln 9): End
new(_) block argument Constants:
00: "in new fiber"
01: "called root"
new(_) block argument Code:
00 (ln 5): Load(Module, Class("System"))
01 (ln 5): Constant(0: "in new fiber")
02 (ln 5): Call(print(_))
03 (ln 5): Pop
04 (ln 6): Load(Module, Null)
05 (ln 6): Call(call())
06 (ln 6): Pop
07 (ln 7): Load(Module, Class("System"))
08 (ln 7): Constant(1: "called root")
09 (ln 7): Call(print(_))
10 (ln 7): Pop
11 (ln 8): Null
12 (ln 8): Return
13 (ln 8): End
