X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_disambiguation%2FcicTextualParser2.mli;h=f7510a9bd3b7f88e1f08858e384b07b8c80043c8;hb=aca103d3c3d740efcc0bcc2932922cff77facb49;hp=e6b1ff7e1fefc597b7b09314a60d36051c6a1e34;hpb=5d4368413bdf9d8e670bab23b912994bc2f8459d;p=helm.git

diff --git a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
index e6b1ff7e1..f7510a9bd 100644
--- a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
+++ b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
@@ -23,15 +23,12 @@
  * 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_command:  char Stream.t -> DisambiguateTypes.command
-val parse_script:   char Stream.t -> DisambiguateTypes.script
+val parse_term:       char Stream.t -> DisambiguateTypes.term
+val parse_statement:  char Stream.t -> (CicAst.term, string) TacticAst.statement
 
 (** {2 Grammar extensions} *)