sig
  val fadvise :
    Unix.file_descr -> int64 -> int64 -> ExtUnixAll.advice -> unit
  external fallocate : Unix.file_descr -> int64 -> int64 -> unit
    = "caml_extunix_fallocate64"
end