external fdatasync : Unix.file_descr -> unit = "caml_extunix_fdatasync"