X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_disambiguation%2FcicTextualParser2.mli;h=659bb2aa51747dee5a41bb54b3c41e18f5945f9f;hb=7e9904185ceff75884783dbf0bad506b8521b857;hp=e867d3435c500cfc620bda538c88f0bc8a44b016;hpb=ae25bae855f66b7ebc9926a80dc38e622f0cff38;p=helm.git

diff --git a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
index e867d3435..659bb2aa5 100644
--- a/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
+++ b/helm/ocaml/cic_disambiguation/cicTextualParser2.mli
@@ -23,22 +23,14 @@
  * http://helm.cs.unibo.it/
  *)
 
-exception Parse_error of string
-
-(** {3 type shortands} *)
-
-type tactic = (CicAst.term, string) TacticAst.tactic
-type tactical = (CicAst.term, string) TacticAst.tactic TacticAst.tactical
-type command = CicAst.term CommandAst.command
-type script = CicAst.term CommandAst.Script.script
+exception Parse_error of Token.flocation * string
 
 (** {2 Parsing functions} *)
 
-val parse_term:     char Stream.t -> CicAst.term
-val parse_tactic:   char Stream.t -> tactic
-val parse_tactical: char Stream.t -> tactical
-val parse_command:  char Stream.t -> command
-val parse_script:   char Stream.t -> script
+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_script:   char Stream.t -> DisambiguateTypes.script
 
 (** {2 Grammar extensions} *)