]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/gTopLevel/texTermEditor.mli
ocaml 3.09 transition
[helm.git] / helm / gTopLevel / texTermEditor.mli
index beb21ec85003fb80bebe74f28ed11f221be3b01c..ece0bd8d99dbb84cee6ffe8a65ea1d7590a67998 100644 (file)
@@ -30,23 +30,22 @@ 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
    (* The input of set_term is unquoted *)
    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