[flang][runtime] Support DT edit descriptor in result of READ(SIZE=)
authorPeter Klausler <pklausler@nvidia.com>
Fri, 17 Feb 2023 00:30:38 +0000 (16:30 -0800)
committerPeter Klausler <pklausler@nvidia.com>
Fri, 17 Feb 2023 17:15:18 +0000 (09:15 -0800)
commit4180b29d206f2049b54111d0465e15d47900b66b
tree2162d0b2bbcc42ca6ab29588e21ac0a6e65427b2
parent7067aee367d40882cf8324357ab5a09275a590b6
[flang][runtime] Support DT edit descriptor in result of READ(SIZE=)

When a formatted I/O READ statement processes a DT edit descriptor to call a
user-defined I/O subroutine to read a derived type data item, all of the
characters that that subroutine reads via child I/O count as charecters
read by an edit descriptor and should accumulate in the result returned
by a SIZE= item in the original READ statement's control list.

Differential Revision: https://reviews.llvm.org/D144234
flang/runtime/connection.h
flang/runtime/descriptor-io.cpp
flang/runtime/internal-unit.cpp
flang/runtime/internal-unit.h
flang/runtime/io-stmt.cpp
flang/runtime/io-stmt.h