X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_disambiguation%2FcicTextualParser2.mli;h=9e3f442d87a2d66fcf2ac31713119012df33b823;hb=8caaccfeb66f6a507e5fb3b4b221a360eb5428c8;hp=a6f8dcce310bd8c30f2f96609d7254a1d4674342;hpb=5095f0f9e11e966d7872d38ab8ef408567c5984e;p=helm.git

diff --git a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
index a6f8dcce3..9e3f442d8 100644
--- a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
+++ b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
@@ -23,15 +23,14 @@
  * 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, string) TacticAst.statement
+val parse_statements:  
+   char Stream.t -> (CicAst.term, string) TacticAst.statement list
 
 (** {2 Grammar extensions} *)