support for terms with metas in check

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

diff --git a/helm/gTopLevel/disambiguatingParser.mli b/helm/gTopLevel/disambiguatingParser.mli
index 6edb842399971bd37f73bd0d20229fc4e7b1371d..3d2c91f25bca396d84a84a09c202b8be2d4dd401 100644 (file)
--- a/helm/gTopLevel/disambiguatingParser.mli
+++ b/helm/gTopLevel/disambiguatingParser.mli
@@ -25,24 +25,26 @@
 
 exception NoWellTypedInterpretation
 
-module Environment :
+module EnvironmentP3 :
  sig
   type t
-  val empty : t
+  val empty : string
   val to_string : t -> string
   val of_string : string -> t
  end
 
-module Make (C : Disambiguate_types.Callbacks) :
+module Make (C : DisambiguateTypes.Callbacks) :
   sig
     val disambiguate_term :
-      MQIConn.handle ->
+      dbd:Mysql.dbd ->
       Cic.context ->
       Cic.metasenv ->
       string ->
-      Environment.t ->  (* previous interpretation status *)
-        Environment.t *                   (* new interpretation status *)
-        Cic.metasenv *                  (* new metasenv *)
-        Cic.term                        (* disambiguated term *)
+      EnvironmentP3.t ->  (* previous interpretation status *)
+      ?initial_ugraph:CicUniv.universe_graph ->
+      (EnvironmentP3.t *               (* new interpretation status *)
+       Cic.metasenv *                  (* new metasenv *)
+       Cic.term *
+       CicUniv.universe_graph) list    (* disambiguated term *)
   end