sig
  val cast : 'a Gobject.obj -> Gtk.font_button Gtk.obj
  module P :
    sig
      val font_name : ([> `fontbutton ], string) Gobject.property
      val show_size : ([> `fontbutton ], bool) Gobject.property
      val show_style : ([> `fontbutton ], bool) Gobject.property
      val title : ([> `fontbutton ], string) Gobject.property
      val use_font : ([> `fontbutton ], bool) Gobject.property
      val use_size : ([> `fontbutton ], bool) Gobject.property
    end
  module S :
    sig val font_set : ([> `fontbutton ], unit -> unit) GtkSignal.t end
  val create : Gtk.font_button Gobject.param list -> Gtk.font_button Gtk.obj
  val make_params :
    cont:(([> `fontbutton ] as 'a) Gobject.param list -> 'b) ->
    'a Gobject.param list -> ?font_name:string -> ?title:string -> 'b
end