1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
puti ::= fn(x: int) { #C("printf(\"%ld\\n\", (long)x); "); }; putf ::= fn(x: float) { #C("printf(\"%f\\n\", (double)x); "); }; // point ::= pkg "point"; Foo ::= struct { x, y : int; }; f ::= fn(t :: Type) int { 5 as t } ; main ::= fn() { i ::= int; puti(f(i)); };