sig type t = Resize of LTerm_geom.size | Key of LTerm_key.t | Sequence of string | Mouse of LTerm_mouse.t val to_string : LTerm_event.t -> string end