test.toc


1
2
3
4
5
6
7
8
9
10
11
12
13
14

puti ::= fn(x: int) {
	 #C("printf(\"%ld\\n\", (long)x);
");
};
putf ::= fn(x: float) {
	 #C("printf(\"%f\\n\", (double)x);
");
};
point ::= pkg "point";

main ::= fn() {
f::=fn(t::Type)Type {t};
x:f(int) = 5;
};