sig
  val cast : 'a Gobject.obj -> Gtk.menu_bar Gtk.obj
  module P :
    sig
      val child_pack_direction :
        ([> `menubar ], GtkEnums.pack_direction) Gobject.property
      val pack_direction :
        ([> `menubar ], GtkEnums.pack_direction) Gobject.property
      val internal_padding : ([> `menubar ], int) Gobject.property
      val shadow_type :
        ([> `menubar ], GtkEnums.shadow_type) Gobject.property
    end
  val create : Gtk.menu_bar Gobject.param list -> Gtk.menu_bar Gtk.obj
end