sig
  external allocation_at_pointer : Gpointer.boxed -> Gtk.rectangle
    = "ml_Val_GtkAllocation"
  val allocation : Gtk.rectangle Gobject.data_conv
end