test.toc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20


getstdout ::= fn() &u8 {
	  #builtin("stdout")
};

fwrite :: fn(&u8, u64, u64, &u8) = #foreign "fwrite";

puts ::= fn(x : []char) {
	 fwrite(&x[0] as &u8 as &u16 as &u8, 1, x.len as u64, getstdout());
};

hw ::= fn() int {
   hw();
   2
};

main ::= fn() {
	 hw();
	 x ::= hw();
};