[all-commits] [llvm/llvm-project] 507f73: [flang] Catch READ/WRITE on direct-access file wit...

[Peter Klausler via All-commits]

  Branch: refs/heads/main
  Home:   https://github.com/llvm/llvm-project
  Commit: 507f7317a0db6e58f170829ec6a10e380450ca47
      https://github.com/llvm/llvm-project/commit/507f7317a0db6e58f170829ec6a10e380450ca47
  Author: Peter Klausler <pklausler at nvidia.com>
  Date:   2022-03-02 (Wed, 02 Mar 2022)

  Changed paths:
    M flang/runtime/unit.cpp
    M flang/runtime/unit.h

  Log Message:
  -----------
  [flang] Catch READ/WRITE on direct-access file without REC=

A data transfer statement must have REC= in its control list
if (and only if) the unit was opened with ACCESS='DIRECT'.
The runtime wasn't catching this error, but was just silently
advancing to the next record as if the access were sequential.

Differential Revision: https://reviews.llvm.org/D120838