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