let pread fd off buf =
      if off < 0
      then invalid_arg "ExtUnix.pread"
      else unsafe_pread fd off buf