sig type t = [ `FOCUS_CHANGE ] Gdk.event val cast : GdkEvent.any -> GdkEvent.Focus.t external focus_in : GdkEvent.Focus.t -> bool = "ml_GdkEventFocus_in" end