(do_spec_1, case 'P'): Don't add underscores to macros starting with
authorRichard Kenner <kenner@gcc.gnu.org>
Thu, 30 Jun 1994 22:21:18 +0000 (18:21 -0400)
committerRichard Kenner <kenner@gcc.gnu.org>
Thu, 30 Jun 1994 22:21:18 +0000 (18:21 -0400)
'_[A-Z]'.

From-SVN: r7626

gcc/gcc.c

index 00ffa389ddb3381312b3136709eba67e557da68d..fe7ed86405ea2ec9df0ffe7fcfaab2cb25ad1502 100644 (file)
--- a/gcc/gcc.c
+++ b/gcc/gcc.c
@@ -3372,7 +3372,8 @@ do_spec_1 (spec, inswitch, soft_matched_part)
                      *x++ = *y++;
                      *x++ = *y++;
 
-                     if (strncmp (y, "__", 2))
+                     if (*y != '_'
+                         || (*(y+1) != '_' && ! isupper (*(y+1))))
                        {
                          /* Stick __ at front of macro name.  */
                          *x++ = '_';
@@ -3413,7 +3414,8 @@ do_spec_1 (spec, inswitch, soft_matched_part)
                    {
                      y += 2;
 
-                     if (strncmp (y, "__", 2))
+                     if (*y != '_'
+                         || (*(y+1) != '_' && ! isupper (*(y+1))))
                        {
                          /* Stick -D__ at front of macro name.  */
                          *x++ = '-';