sig
  val create_button :
    ?label:string ->
    stock:GtkStock.id ->
    packing:(GObj.widget -> unit) -> unit -> GButton.button
end