7 lines
181 B
Text
Executable file
7 lines
181 B
Text
Executable file
(setglobal Ex2!
|
|
(let
|
|
(f1/82 =
|
|
(function param/83
|
|
(catch (if (!= param/83 0) (observe 1) (exit 1)) with (1)
|
|
(observe 0))))
|
|
(makeblock 0 f1/82)))
|