sig
  val lseek : BatUnix.file_descr -> int64 -> BatUnix.seek_command -> int64
  val truncate : string -> int64 -> unit
  val ftruncate : BatUnix.file_descr -> int64 -> unit
  type stats =
    Unix.LargeFile.stats = {
    st_dev : int;
    st_ino : int;
    st_kind : BatUnix.file_kind;
    st_perm : BatUnix.file_perm;
    st_nlink : int;
    st_uid : int;
    st_gid : int;
    st_rdev : int;
    st_size : int64;
    st_atime : float;
    st_mtime : float;
    st_ctime : float;
  }
  val stat : string -> BatUnix.LargeFile.stats
  val lstat : string -> BatUnix.LargeFile.stats
  val fstat : BatUnix.file_descr -> BatUnix.LargeFile.stats
end