(yylex): Copy the string value we get from __FUNCTION__.

From-SVN: r3798

diff --git a/gcc/c-lex.c b/gcc/c-lex.c
index 36cffbb4e806c262d9d8558f20d0193be0802960..c55ac2cfda5a709229a83ea59b00dab1eed1e888 100644 (file)
--- a/gcc/c-lex.c
+++ b/gcc/c-lex.c
@@ -1167,7 +1167,12 @@ yylex ()
                   && DECL_INITIAL (lastiddecl) != 0
                   && TREE_CODE (DECL_INITIAL (lastiddecl)) == STRING_CST)
            {
-             yylval.ttype = DECL_INITIAL (lastiddecl);
+             tree stringval = DECL_INITIAL (lastiddecl);
+             
+             /* Copy the string value so that we won't clobber anything
+                if we put something in the TREE_CHAIN of this one.  */
+             yylval.ttype = build_string (TREE_STRING_LENGTH (stringval),
+                                          TREE_STRING_POINTER (stringval));
              value = STRING;
            }
           else if (doing_objc_thang)