ocaml 3.09 transition

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

diff --git a/helm/gTopLevel/hbugs.mli b/helm/gTopLevel/hbugs.mli
index 022bbf43a2395dda6ffaba0e86db81d62616bd67..80f8c74e9c3385de9c63b4ac99105cf5361c5057 100644 (file)
--- a/helm/gTopLevel/hbugs.mli
+++ b/helm/gTopLevel/hbugs.mli
@@ -32,9 +32,26 @@ val toggle: bool -> unit
 
 val quit: unit -> unit
 
+  (** send current proof assistant state to hbugs broker *)
 val notify: unit -> unit
+
 val clear: unit -> unit
 
 module type Unit = sig end
 
 module Initialize (Tactics: InvokeTactics.Tactics) : Unit
+
+(*
+  External Web Services controls. TEMPORARY(?)
+*)
+
+val start_web_services: unit -> unit
+val stop_web_services: unit -> unit
+
+(* Other callbacks *)
+
+open Hbugs_types
+
+  (* what to do when the user single click on an hint *)
+val set_describe_hint_callback: (hint -> unit) -> unit
+