Commits

ysulsky  committed 0619157

always build Unix.fdatasync (fall back on fsync)

  • Participants
  • Parent commits 4199860

Comments (0)

Files changed (2)

File base/core/lib/core_unix.ml

 
 external sync : unit -> unit = "unix_sync"
 external fsync : Unix.file_descr -> unit = "unix_fsync"
-IFDEF FDATASYNC THEN
 external fdatasync : Unix.file_descr -> unit = "unix_fdatasync"
-ENDIF
 
 external dirfd : Unix.dir_handle -> File_descr.t = "unix_dirfd"
 

File base/core/lib/core_unix.mli

 external fsync : File_descr.t -> unit = "unix_fsync"
 (** Synchronize the kernel buffers of a given file descriptor with disk. *)
 
-IFDEF FDATASYNC THEN
 external fdatasync : File_descr.t -> unit = "unix_fdatasync"
 (** Synchronize the kernel buffers of a given file descriptor with disk,
     but do not necessarily write file attributes. *)
-ENDIF
 
 external readdir_ino :
   dir_handle -> string * nativeint = "unix_readdir_ino_stub"