X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_disambiguation%2FcicTextualParser2.mli;h=c95485e52661b20b1028c53d8eddf42cb672c967;hb=bbe7741f3bbaacb93f2876c018dace82f5e929b8;hp=351d929e27e75fafb8404c9e0f62842fcb09a42b;hpb=7a72e5c5129c814e567f03e14d752eff4086fb52;p=helm.git

diff --git a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
index 351d929e2..c95485e52 100644
--- a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
+++ b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
@@ -23,13 +23,15 @@
  * 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 -> DisambiguateTypes.term
-val parse_tactic:   char Stream.t -> DisambiguateTypes.tactic
-val parse_tactical: char Stream.t -> DisambiguateTypes.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} *)