let single_pread fd off buf =
          if off < Int64.zero
          then invalid_arg "ExtUnix.LargeFile.single_pread"
          else unsafe_single_pread fd off buf