sig
  external create : unit -> Gtk.tooltips Gtk.obj = "ml_gtk_tooltips_new"
  external enable : [> `tooltips ] Gtk.obj -> unit = "ml_gtk_tooltips_enable"
  external disable : [> `tooltips ] Gtk.obj -> unit
    = "ml_gtk_tooltips_disable"
  external set_delay : [> `tooltips ] Gtk.obj -> int -> unit
    = "ml_gtk_tooltips_set_delay"
  external set_tip :
    [> `tooltips ] Gtk.obj ->
    [> `widget ] Gtk.obj -> ?text:string -> ?privat:string -> unit
    = "ml_gtk_tooltips_set_tip"
end