sig
  type t = [ `EXPOSE ] Gdk.event
  val cast : GdkEvent.any -> GdkEvent.Expose.t
  external area : GdkEvent.Expose.t -> Gdk.Rectangle.t
    = "ml_GdkEventExpose_area"
  external count : GdkEvent.Expose.t -> int = "ml_GdkEventExpose_count"
end