sig
  val test_modifier : Gdk.Tags.modifier -> int -> bool
  val modifier : int -> Gdk.Tags.modifier list
  val window_state : int -> Gdk.Tags.window_state list
end