summaryrefslogtreecommitdiff
path: root/test.toc
blob: 33cd6ad9123fe024fa4d4d8c316fa1b34a43115c (plain)
1
2
3
4
5
6
7
8
9
10
11

stdout :: &u8 = #foreign "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, stdout);
};

main ::= fn() {
	 puts("Hello, world!\n");
};