From: Richard Kenner <kenner@gcc.gnu.org>
Date: Thu, 30 Jun 1994 22:21:18 +0000 (-0400)
Subject: (do_spec_1, case 'P'): Don't add underscores to macros starting with
X-Git-Tag: misc/cutover-egcs-0~6317
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=353646926a7db50095f541f3c33847c617b227bb;p=thirdparty%2Fgcc.git

(do_spec_1, case 'P'): Don't add underscores to macros starting with
'_[A-Z]'.

From-SVN: r7626
---

diff --git a/gcc/gcc.c b/gcc/gcc.c
index 00ffa389ddb3..fe7ed86405ea 100644
--- 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++ = '-';