let expose : ([>`widget], GdkEvent.Expose.t -> bool) t =
        { name = "expose_event"; classe = `widget; marshaller = marshal }