let any : ([>`widget], Gdk.Tags.event_type Gdk.event -> bool) t =
        { name = "event"; classe = `widget; marshaller = marshal }