diff --git a/flang/runtime/io-stmt.cpp b/flang/runtime/io-stmt.cpp --- a/flang/runtime/io-stmt.cpp +++ b/flang/runtime/io-stmt.cpp @@ -1340,7 +1340,7 @@ case HashInquiryKeyword("STREAM"): case HashInquiryKeyword("WRITE"): case HashInquiryKeyword("UNFORMATTED"): - ToFortranDefaultCharacter(result, length, "UNKNONN"); + ToFortranDefaultCharacter(result, length, "UNKNOWN"); return true; default: BadInquiryKeywordHashCrash(inquiry);