https://gcc.gnu.org/g:4c8c400ddf0d6de54b0ee557836a934b4025d21f

commit r16-111-g4c8c400ddf0d6de54b0ee557836a934b4025d21f
Author: Jakub Jelinek <ja...@redhat.com>
Date:   Thu Apr 24 15:29:50 2025 +0200

    c: Allow $@` in GNU23/GNU2Y raw string delimiters [PR110343]
    
    Aaron mentioned in the PR that late in C23 N3124 was adopted and
    $@` are now part of basic character set.  The paper has been implemented
    in GCC from what I can see, but we should allow for GNU23/2Y $@` in
    raw string delimiters as well, like they are allowed for C++26, because
    the delimiters can contain anything from basic character set but space,
    ()\, tab, form-feed, newline and backspace.
    
    2025-04-24  Jakub Jelinek  <ja...@redhat.com>
    
            PR c++/110343
            * lex.cc (lex_raw_string): For C allow $@` in raw string delimiters
            if CPP_OPTION (pfile, low_ucns) i.e. for C23 and later.
    
            * gcc.dg/raw-string-1.c: New test.

Diff:
---
 gcc/testsuite/gcc.dg/raw-string-1.c | 25 +++++++++++++++++++++++++
 libcpp/lex.cc                       |  5 +++--
 2 files changed, 28 insertions(+), 2 deletions(-)

diff --git a/gcc/testsuite/gcc.dg/raw-string-1.c 
b/gcc/testsuite/gcc.dg/raw-string-1.c
new file mode 100644
index 000000000000..77d6145101b9
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/raw-string-1.c
@@ -0,0 +1,25 @@
+/* PR c++/110343 */
+/* { dg-do compile } */
+/* { dg-options "-std=gnu23" } */
+
+const void *s0 = R"0123456789abcdefg()0123456789abcdefg" 0;
+       /* { dg-error "raw string delimiter longer" "longer" { target *-*-* } 
.-1 } */
+       /* { dg-error "stray" "stray" { target *-*-* } .-2 } */
+const void *s1 = R" () " 0;
+       /* { dg-error "invalid character" "invalid" { target *-*-* } .-1 } */
+       /* { dg-error "stray" "stray" { target *-*-* } .-2 } */
+const void *s2 = R"    ()      " 0;
+       /* { dg-error "invalid character" "invalid" { target *-*-* } .-1 } */
+       /* { dg-error "stray" "stray" { target *-*-* } .-2 } */
+const void *s3 = R")())" 0;
+       /* { dg-error "invalid character" "invalid" { target *-*-* } .-1 } */
+       /* { dg-error "stray" "stray" { target *-*-* } .-2 } */
+const char *s4 = R"@()@";
+const char *s5 = R"$()$";
+const char *s6 = R"`()`";
+const void *s7 = R"\u0040()\u0040" 0;
+       /* { dg-error "invalid character" "invalid" { target *-*-* } .-1 } */
+       /* { dg-error "stray" "stray" { target *-*-* } .-2 } */
+const char *s8 = R"`@$$@`@`$()`@$$@`@`$";
+
+int main () {}
diff --git a/libcpp/lex.cc b/libcpp/lex.cc
index 2d02ce6e7346..e7705a64f395 100644
--- a/libcpp/lex.cc
+++ b/libcpp/lex.cc
@@ -2711,8 +2711,9 @@ lex_raw_string (cpp_reader *pfile, cpp_token *token, 
const uchar *base)
                       || c == '!' || c == '=' || c == ','
                       || c == '"' || c == '\''
                       || ((c == '$' || c == '@' || c == '`')
-                          && CPP_OPTION (pfile, cplusplus)
-                          && CPP_OPTION (pfile, lang) > CLK_CXX23)))
+                          && (CPP_OPTION (pfile, cplusplus)
+                              ? CPP_OPTION (pfile, lang) > CLK_CXX23
+                              : CPP_OPTION (pfile, low_ucns)))))
            prefix[prefix_len++] = c;
          else
            {

Reply via email to