sig
  type t = [ `CONFIGURE ] Gdk.event
  val cast : GdkEvent.any -> GdkEvent.Configure.t
  external x : GdkEvent.Configure.t -> int = "ml_GdkEventConfigure_x"
  external y : GdkEvent.Configure.t -> int = "ml_GdkEventConfigure_y"
  external width : GdkEvent.Configure.t -> int = "ml_GdkEventConfigure_width"
  external height : GdkEvent.Configure.t -> int
    = "ml_GdkEventConfigure_height"
end