X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2Fhbugs.mli;h=80f8c74e9c3385de9c63b4ac99105cf5361c5057;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=022bbf43a2395dda6ffaba0e86db81d62616bd67;hpb=bac72fcaa876137ab7a5630e0c1badc2a627dce8;p=helm.git

diff --git a/helm/gTopLevel/hbugs.mli b/helm/gTopLevel/hbugs.mli
index 022bbf43a..80f8c74e9 100644
--- 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
+