- enriched Parse_error exception with error location

[helm.git] / helm / ocaml / cic_disambiguation / disambiguateTypes.mli

diff --git a/helm/ocaml/cic_disambiguation/disambiguateTypes.mli b/helm/ocaml/cic_disambiguation/disambiguateTypes.mli
index 2849a858ca88230e9b686b5165988a47ae2abd27..e88aa51bf3ef19b779e7e10c038b54b9cc0e1c54 100644 (file)
--- a/helm/ocaml/cic_disambiguation/disambiguateTypes.mli
+++ b/helm/ocaml/cic_disambiguation/disambiguateTypes.mli
@@ -52,7 +52,7 @@ module type Callbacks =
 
     (** @param title gtk window title for user prompting
      * @param id unbound identifier which originated this callback invocation *)
-    val input_or_locate_uri : title:string -> ?id:string -> UriManager.uri
+    val input_or_locate_uri : title:string -> ?id:string -> unit -> UriManager.uri
   end
 
 val string_of_domain_item: domain_item -> string
@@ -62,7 +62,6 @@ val string_of_domain: domain_item list -> string
 
 type term = CicAst.term
 type tactic = (term, string) TacticAst.tactic
-type tactical = (term, string) TacticAst.tactic TacticAst.tactical
-type command = term CommandAst.command
-type script = term CommandAst.Script.script
+type tactical = (term, string) TacticAst.tactical
 
+val empty_environment: environment