* config/tc-ppc.c (ppc_parse_name): Skip leading '%'.

	(md_assemble): When parsing PPC_OPERAND_CR, add '%' to set of
	chars that can start a name.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 25e70dbf2adde6e6acd5a957851da135bba06235..59112826e386974d1d1059b548f7094a50d985be 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,9 @@
+2007-10-19  Alan Modra  <amodra@bigpond.net.au>
+
+       * config/tc-ppc.c (ppc_parse_name): Skip leading '%'.
+       (md_assemble): When parsing PPC_OPERAND_CR, add '%' to set of
+       chars that can start a name.
+
 2007-10-18  Carlos O'Donell  <carlos@systemhalted.org>
 
        * config/tc-hppa.c (pa_ip): Fix comment typo.

diff --git a/gas/config/tc-ppc.c b/gas/config/tc-ppc.c
index 713d25be8f67a652ef0cf2c160f3342e1347b013..2a598479054ebc21cf96af9300893160193ffe7f 100644 (file)
--- a/gas/config/tc-ppc.c
+++ b/gas/config/tc-ppc.c
@@ -684,6 +684,8 @@ ppc_parse_name (const char *name, expressionS *expr)
   if (! cr_operand)
     return 0;
 
+  if (*name == '%')
+    ++name;
   val = reg_name_search (cr_names, sizeof cr_names / sizeof cr_names[0],
                         name);
   if (val < 0)
@@ -2454,10 +2456,16 @@ md_assemble (char *str)
        {
          if (! register_name (&ex))
            {
+             char save_lex = lex_type['%'];
+
              if ((operand->flags & PPC_OPERAND_CR) != 0)
-               cr_operand = TRUE;
+               {
+                 cr_operand = TRUE;
+                 lex_type['%'] |= LEX_BEGIN_NAME;
+               }
              expression (&ex);
              cr_operand = FALSE;
+             lex_type['%'] = save_lex;
            }
        }