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