--- trunk/src/ast/ast.sml 2010/05/26 17:28:54 81 +++ trunk/src/ast/ast.sml 2010/05/26 18:20:49 82 @@ -46,7 +46,7 @@ = VD_Decl of var * expr and method - = M_Method of var * stmt + = M_Method of Atom.atom * stmt and create = C_Create of (var * expr list) @@ -64,10 +64,10 @@ | S_Stabilize and expr - = E_Var of var * Ty.var_bind list * Ty.ty + = E_Var of var * Ty.meta_var list * Ty.ty | E_Lit of Literal.literal | E_Tuple of expr list - | E_Apply of var * Ty.var_bind list * expr list * Ty.ty + | E_Apply of var * Ty.meta_var list * expr list * Ty.ty | E_Cons of Ty.ty * expr list | E_Cond of expr * expr * expr