[all-commits] [llvm/llvm-project] ea8cdf: [flang] Fix a bug in INQUIRE(IOLENGTH=) output

vdonaldson via All-commits all-commits at lists.llvm.org
Tue Nov 16 11:33:33 PST 2021


  Branch: refs/heads/main
  Home:   https://github.com/llvm/llvm-project
  Commit: ea8cdf322f3962765218829a0aece71e0bb5e989
      https://github.com/llvm/llvm-project/commit/ea8cdf322f3962765218829a0aece71e0bb5e989
  Author: V Donaldson <vdonaldson at nvidia.com>
  Date:   2021-11-16 (Tue, 16 Nov 2021)

  Changed paths:
    M flang/runtime/io-stmt.cpp
    M flang/unittests/Runtime/ExternalIOTest.cpp

  Log Message:
  -----------
  [flang] Fix a bug in INQUIRE(IOLENGTH=) output

The inquire by output list form of the INQUIRE statement calculates the
number of file storage units that would be required to store the data
of an output list in an unformatted file.  Currently, the result is
incorrectly multiplied by the number of bytes for a data type.  A query
for "INTEGER(KIND=4) A(10)" should be 40, not 160.

Update formatting.




More information about the All-commits mailing list