type types = [ | `BUTTON_PRESS |
| `TWO_BUTTON_PRESS |
| `THREE_BUTTON_PRESS |
| `BUTTON_RELEASE |
]type t = types Gdk.event
val cast : any -> tval time : [< timed ] Gdk.event -> int32
val x : t -> floatval y : t -> floatval axes : t -> (float * float) optionval state : t -> intval button : t -> intval device : t -> Gdk.deviceval x_root : t -> floatval y_root : t -> floatval set_type : t -> [< types ] -> unitval set_button : t -> int -> unit