[flang] Canonicalize nonstandard BOZ literals to avoid spurious parse/unparse/reparse...
authorpeter klausler <pklausler@nvidia.com>
Wed, 8 Aug 2018 23:41:44 +0000 (16:41 -0700)
committerpeter klausler <pklausler@nvidia.com>
Thu, 9 Aug 2018 17:17:44 +0000 (10:17 -0700)
Original-commit: flang-compiler/f18@d651990632d1cd52ece98de00689a4bfebeb4af0
Reviewed-on: https://github.com/flang-compiler/f18/pull/165

flang/lib/parser/token-parsers.h

index 5135d9a..ff407a3 100644 (file)
@@ -353,7 +353,7 @@ struct BOZLiteral {
       if (!IsHexadecimalDigit(**at)) {
         return std::nullopt;
       }
-      content += **at;
+      content += ToLowerCaseLetter(**at);
     }
 
     if (!base) {