ocaml 3.09 transition

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

diff --git a/helm/gTopLevel/termEditor.mli b/helm/gTopLevel/termEditor.mli
index ce51bdbe84fcba241fe8e67cc2006393e1b9c034..2817f812a7b9e44c4cd5fb26343550fb250795dc 100644 (file)
--- a/helm/gTopLevel/termEditor.mli
+++ b/helm/gTopLevel/termEditor.mli
@@ -30,22 +30,21 @@ class type term_editor =
    method get_as_string : string
    method get_metasenv_and_term :
      context:Cic.context ->
-     metasenv:Cic.metasenv -> Cic.metasenv * Cic.term
+     metasenv:Cic.metasenv -> 
+     Cic.metasenv * Cic.term * CicUniv.universe_graph
    method reset : unit
    method set_term : string -> unit
-   method id_to_uris : Disambiguate.domain_and_interpretation ref
+   method environment : DisambiguatingParser.EnvironmentP3.t ref
  end
 
-val empty_id_to_uris : Disambiguate.domain_and_interpretation
-
-module Make (C : Disambiguate.Callbacks) :
+module Make (C : DisambiguateTypes.Callbacks) :
    sig
     val term_editor :
-     MQIConn.handle ->
+     dbd:Mysql.dbd ->
      ?packing:(GObj.widget -> unit) ->
      ?width:int ->
      ?height:int ->
      ?isnotempty_callback:(bool -> unit) ->
-     ?share_id_to_uris_with:term_editor ->
+     ?share_environment_with:term_editor ->
      unit -> term_editor
    end