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