sig
  val activate : ([> `button ], unit -> unit) GtkSignal.t
  val clicked : ([> `button ], unit -> unit) GtkSignal.t
  val enter : ([> `button ], unit -> unit) GtkSignal.t
  val leave : ([> `button ], unit -> unit) GtkSignal.t
  val pressed : ([> `button ], unit -> unit) GtkSignal.t
  val released : ([> `button ], unit -> unit) GtkSignal.t
end