sig
  val cast : 'a Gobject.obj -> Gtk.frame Gtk.obj
  module P :
    sig
      val label : ([> `frame ], string option) Gobject.property
      val label_widget :
        ([> `frame ], Gtk.widget Gtk.obj option) Gobject.property
      val label_xalign : ([> `frame ], float) Gobject.property
      val label_yalign : ([> `frame ], float) Gobject.property
      val shadow_type : ([> `frame ], GtkEnums.shadow_type) Gobject.property
    end
  val create : Gtk.frame Gobject.param list -> Gtk.frame Gtk.obj
  val make_params :
    cont:(([> `frame ] as 'a) Gobject.param list -> 'b) ->
    'a Gobject.param list ->
    ?label:string ->
    ?label_xalign:float ->
    ?label_yalign:float -> ?shadow_type:GtkEnums.shadow_type -> 'b
end