sig
  val cast : 'a Gobject.obj -> Gtk.fixed Gtk.obj
  val create : Gtk.fixed Gobject.param list -> Gtk.fixed Gtk.obj
  external put :
    [> `fixed ] Gtk.obj -> [> `widget ] Gtk.obj -> x:int -> y:int -> unit
    = "ml_gtk_fixed_put"
  external move :
    [> `fixed ] Gtk.obj -> [> `widget ] Gtk.obj -> x:int -> y:int -> unit
    = "ml_gtk_fixed_move"
  external set_has_window : [> `fixed ] Gtk.obj -> bool -> unit
    = "ml_gtk_fixed_set_has_window"
  external get_has_window : [> `fixed ] Gtk.obj -> bool
    = "ml_gtk_fixed_get_has_window"
end