OSDN Git Service

(do_spec_1, case 'P'): Don't add underscores to macros starting with
authorkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 30 Jun 1994 22:21:18 +0000 (22:21 +0000)
committerkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 30 Jun 1994 22:21:18 +0000 (22:21 +0000)
'_[A-Z]'.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@7626 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/gcc.c

index 00ffa38..fe7ed86 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++ = '-';