* http://helm.cs.unibo.it/
*)
-exception Parse_error of string
+exception Parse_error of Token.flocation * string
(** {2 Parsing functions} *)
-val parse_term: char Stream.t -> CicAst.term
-val parse_tactic: char Stream.t -> (CicAst.term, string) TacticAst.tactic
-val parse_tactical:
- char Stream.t ->
- (CicAst.term, string) TacticAst.tactic TacticAst.tactical
+val parse_term: char Stream.t -> DisambiguateTypes.term
+val parse_statement:
+ char Stream.t -> (CicAst.term, TacticAst.obj,string) TacticAst.statement
+val parse_statements:
+ char Stream.t -> (CicAst.term, TacticAst.obj, string) TacticAst.statement list
(** {2 Grammar extensions} *)