external is_open_descr : Unix.file_descr -> bool =
  "caml_extunix_is_open_descr"