let delete : ([>`widget], [`DELETEGdk.event -> bool) t =
        { name = "delete_event"; classe = `widget; marshaller = marshal }