[flang-commits] [PATCH] D127029: [flang][runtime] Fix WRITE after OPEN(.., ACCESS="APPEND")

[vdonaldson via Phabricator via flang-commits]

vdonaldson added inline comments.


================
Comment at: flang/runtime/unit.cpp:140
     } else if (totalBytes && (*totalBytes % *openRecl != 0)) {
-      handler.SignalError(IostatOpenBadAppend,
           "OPEN(UNIT=%d,ACCESS='DIRECT',RECL=%jd): record length is not an "
----------------
I don't see any other uses of //IostatOpenBadAppend//.  Should this value be deleted?


CHANGES SINCE LAST ACTION
  https://reviews.llvm.org/D127029/new/

https://reviews.llvm.org/D127029