[flang] Fix descriptor-based array data item I/O for list-directed CHARACTER & LOGICAL
authorpeter klausler <pklausler@nvidia.com>
Wed, 30 Sep 2020 19:43:21 +0000 (12:43 -0700)
committerpeter klausler <pklausler@nvidia.com>
Wed, 30 Sep 2020 21:01:45 +0000 (14:01 -0700)
commit0c3c8f4ae69a619efd8dc088e2572db172d40547
tree5db9e44f30b31a838bfcf30f24ab064c0bfd5509
parentae4c400e02fc3f7cff11cc332e6b107353b3e6a2
[flang] Fix descriptor-based array data item I/O for list-directed CHARACTER & LOGICAL

These types have to distinguish list-directed I/O from formatted I/O,
and the subscript incrementation call was in the formatted branch
of the if() rather than after the if().

Differential revision: https://reviews.llvm.org/D88606
flang/runtime/descriptor-io.h
flang/unittests/Runtime/hello.cpp