let cast ev : t = cast ev ~kind:[`BUTTON_PRESS;`TWO_BUTTON_PRESS; `THREE_BUTTON_PRESS;`BUTTON_RELEASE]