ocaml/otherlibs/labltk/builtin/winfo_contained.ml

3 lines
62 B
OCaml
Raw Normal View History

let contained ~x ~y w =
forget_type w = containing ~x ~y ()