Page MenuHomePhabricator

[flang] Allow record advancement in external formatted sequential READ
ClosedPublic

Authored by klausler on Sep 30 2020, 1:00 PM.

Details

Summary

The '/' control edit descriptor causes a runtime crash for an
external formatted sequential READ because the AdvanceRecord()
member function for external units implemented only the tasks
to finish reading the current record. Split those out into
a new FinishReadingRecord() member function, call that instead
from EndIoStatement(), and change AdvanceRecord() to both
finish reading the current record and to begin reading the next
one.

Diff Detail

Event Timeline

klausler created this revision.Sep 30 2020, 1:00 PM
Herald added a project: Restricted Project. · View Herald Transcript
klausler requested review of this revision.Sep 30 2020, 1:00 PM
klausler retitled this revision from Allow record advancement in external formatted sequential READ to [flang] Allow record advancement in external formatted sequential READ.Sep 30 2020, 1:17 PM
PeteSteinfeld accepted this revision.Sep 30 2020, 4:20 PM

All builds, tests, and looks good.

This revision is now accepted and ready to land.Sep 30 2020, 4:20 PM