From be133ff4c44060e18a9c8a5e55c32d242007c8d1 Mon Sep 17 00:00:00 2001 From: Peter Klausler Date: Wed, 9 Apr 2025 12:30:05 -0700 Subject: [flang] Fix preprocessor regression (#134405) For numeric kind suffixes like 1_foo, the preprocessor should be able to perform macro replacement for macros named either "_foo" or "foo". Fixes https://github.com/llvm/llvm-project/issues/133399. --- flang/lib/Parser/token-sequence.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'flang/lib/Parser/token-sequence.cpp') diff --git a/flang/lib/Parser/token-sequence.cpp b/flang/lib/Parser/token-sequence.cpp index fb1ea59..c0655f6 100644 --- a/flang/lib/Parser/token-sequence.cpp +++ b/flang/lib/Parser/token-sequence.cpp @@ -187,7 +187,7 @@ TokenSequence &TokenSequence::ToLowerCase() { } else if (*p == 'h' || *p == 'H') { // Hollerith *p = 'h'; - } else if (*p == '_') { + } else if (*p == '_' && p + 1 < limit && (p[1] == '"' || p[1] == '\'')) { // kind-prefixed character literal (e.g., 1_"ABC") } else { // exponent -- cgit v1.1