Index: flang/runtime/unit.cpp =================================================================== --- flang/runtime/unit.cpp +++ flang/runtime/unit.cpp @@ -839,7 +839,7 @@ } void ExternalFileUnit::DoEndfile(IoErrorHandler &handler) { - if (access == Access::Sequential) { + if (IsRecordFile()) { endfileRecordNumber = currentRecordNumber; } FlushOutput(handler);