let single_pwrite fd off buf ofs len =
      if off < Int64.zero
      then invalid_arg "ExtUnix.LargeFile.single_pwrite"
      else unsafe_single_pwrite fd off buf ofs len