ocaml 3.09 transition

[helm.git] / helm / gTopLevel / batchParser.mli

diff --git a/helm/gTopLevel/batchParser.mli b/helm/gTopLevel/batchParser.mli
index ff82e6fa057d9001dc43e4241d5e0a03df0640f1..6d2900304a228708270a8268e1f947c367c13b74 100644 (file)
--- a/helm/gTopLevel/batchParser.mli
+++ b/helm/gTopLevel/batchParser.mli
@@ -26,21 +26,29 @@
 exception Failure of string
 
   (** uri_pred which rejects ll .var URIs *)
-val constants_only: (string -> bool)
+val constants_only: prefix:string -> (string -> bool)
 
   (** @param variables enabled
-   * @param variables prefix
+   * @param variables prefix varsprefix
    * @return uri predicate suitable for functions below *)
-val uri_pred_of_conf: bool -> string -> (string -> bool)
+val uri_pred_of_conf:
+ bool -> prefix:string -> varsprefix:string -> (string -> bool)
 
   (** Parse a cic term from the given string using disambiguating parser in
    * batch mode if possible, otherwise raises Failure above.
    * uri_pred is the predicate used to select which uris are tried. Per default
    * only constant URIs are accepted *)
-val parse: MQIConn.handle -> ?uri_pred:(string -> bool) -> string -> (Cic.metasenv * Cic.term) list
+val parse:
+ Mysql.dbd -> ?uri_pred:(string -> bool) -> string ->  
+  CicUniv.universe_graph ->
+  (DisambiguatingParser.EnvironmentP3.t * 
+   Cic.metasenv * 
+   Cic.term * 
+   CicUniv.universe_graph) list
 
   (** as above, but instead of returning the parsed cic term, pretty prints it
    * (ignoring returned metasenv)
    *)
-val parse_pp: MQIConn.handle -> ?uri_pred:(string -> bool) -> string -> string list
+val parse_pp: Mysql.dbd -> ?uri_pred:(string -> bool) -> 
+  string -> CicUniv.universe_graph -> string list