sig
  val activate : ([> `menuitem ], unit -> unit) GtkSignal.t
  val activate_item : ([> `menuitem ], unit -> unit) GtkSignal.t
end