2010-08-18 09:00:10 -07:00
|
|
|
|
|
|
|
|
import std.util.option;
|
|
|
|
|
import std.map.hashmap;
|
|
|
|
|
|
|
|
|
|
type ident = str;
|
|
|
|
|
|
|
|
|
|
type crate = rec( str filename,
|
|
|
|
|
_mod module);
|
|
|
|
|
|
|
|
|
|
type block = vec[stmt];
|
|
|
|
|
|
|
|
|
|
type stmt = tag( stmt_block(block),
|
|
|
|
|
stmt_decl(@decl),
|
|
|
|
|
stmt_ret(option[@lval]) );
|
|
|
|
|
|
|
|
|
|
type decl = tag( decl_local(ident, option[ty]),
|
|
|
|
|
decl_item(ident, @item) );
|
|
|
|
|
|
|
|
|
|
type lval = tag( lval_ident(ident),
|
|
|
|
|
lval_ext(@lval, ident),
|
|
|
|
|
lval_idx(@lval, @atom) );
|
|
|
|
|
|
|
|
|
|
type atom = tag( atom_lit(lit));
|
|
|
|
|
|
|
|
|
|
type lit = tag( lit_char(char),
|
|
|
|
|
lit_int(int),
|
|
|
|
|
lit_nil(),
|
|
|
|
|
lit_bool(bool) );
|
|
|
|
|
|
|
|
|
|
type ty = tag( ty_nil(),
|
|
|
|
|
ty_bool(),
|
|
|
|
|
ty_int(),
|
|
|
|
|
ty_char() );
|
|
|
|
|
|
|
|
|
|
type mode = tag( local(), alias() );
|
|
|
|
|
|
|
|
|
|
type slot = rec(ty ty, mode mode);
|
|
|
|
|
|
|
|
|
|
type _fn = rec(vec[rec(slot slot, ident ident)] inputs,
|
|
|
|
|
slot output,
|
|
|
|
|
block body);
|
|
|
|
|
|
|
|
|
|
type _mod = hashmap[ident,item];
|
|
|
|
|
|
|
|
|
|
type item = tag( item_fn(@_fn),
|
|
|
|
|
item_mod(@_mod) );
|
|
|
|
|
|
2010-08-12 10:27:50 -07:00
|
|
|
|
|
|
|
|
//
|
|
|
|
|
// Local Variables:
|
|
|
|
|
// mode: rust
|
|
|
|
|
// fill-column: 78;
|
|
|
|
|
// indent-tabs-mode: nil
|
|
|
|
|
// c-basic-offset: 4
|
|
|
|
|
// buffer-file-coding-system: utf-8-unix
|
|
|
|
|
// compile-command: "make -k -C ../.. 2>&1 | sed -e 's/\\/x\\//x:\\//g'";
|
|
|
|
|
// End:
|
|
|
|
|
//
|
