1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
#include "tests/std/io.toc"; #init(-50) init(1); #init(30) init(2); #init(-7) init(3); #init(-42) init(4); init ::= fn(a: int) { writes("Initializing... #"); writei(a); x = 5; } x: int; main ::= fn() { writes("Main's value of x is: "); puti(x); }