[flang-commits] [flang] 1794b61 - [flang][runtime] Fix spelling of INQUIRE result (#75372)
via flang-commits
flang-commits at lists.llvm.org
Tue Dec 26 15:33:38 PST 2023
Author: Peter Klausler
Date: 2023-12-26T15:33:34-08:00
New Revision: 1794b61472515078e0a16ec2accf972ef1adf4be
URL: https://github.com/llvm/llvm-project/commit/1794b61472515078e0a16ec2accf972ef1adf4be
DIFF: https://github.com/llvm/llvm-project/commit/1794b61472515078e0a16ec2accf972ef1adf4be.diff
LOG: [flang][runtime] Fix spelling of INQUIRE result (#75372)
Embarrassingly, the runtime was returning UNKNONN rather than UNKNOWN
for things like INQUIRE(..., FORMAT=).
Added:
Modified:
flang/runtime/io-stmt.cpp
Removed:
################################################################################
diff --git a/flang/runtime/io-stmt.cpp b/flang/runtime/io-stmt.cpp
index dedf1f8364ad37..4072dbf2659449 100644
--- a/flang/runtime/io-stmt.cpp
+++ b/flang/runtime/io-stmt.cpp
@@ -1346,7 +1346,7 @@ bool InquireUnconnectedFileState::Inquire(
case HashInquiryKeyword("SEQUENTIAL"):
case HashInquiryKeyword("STREAM"):
case HashInquiryKeyword("UNFORMATTED"):
- str = "UNKNONN";
+ str = "UNKNOWN";
break;
case HashInquiryKeyword("READ"):
str =
More information about the flang-commits
mailing list