sig
  val cast : 'a Gobject.obj -> Gtk.menu_tool_button Gtk.obj
  module P :
    sig
      val menu : ([> `menutoolbutton ], Gtk.menu Gtk.obj) Gobject.property
    end
  val create :
    Gtk.menu_tool_button Gobject.param list -> Gtk.menu_tool_button Gtk.obj
  external set_arrow_tooltip :
    [> `menutoolbutton ] Gtk.obj ->
    [> `tooltips ] Gtk.obj -> string -> string -> unit
    = "ml_gtk_menu_tool_button_set_arrow_tooltip"
end