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 { // b: Bar; // }; // Bar ::= struct { // f: Foo; // }; Foo ::= struct { p: &Foo; }; main ::= fn() { f::=fn(t::Type)Type {t}; x:f(int) = 5; };