1 exception Unbound_var of string Node.t
2 exception Unbound_class of (string*string) Node.t
3 exception Unbound_method of string Node.t
5 type method_ = Ast.ident
7 [ `ExternalClass of Ast.name * method_ list
8 | `External of Ast.ident
11 val check : stmt list -> Ast.stmt list