* config/tc-hppa.c (pa_ip): Support 'Z' argument.

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 47c6c1033a6aa29dbff0790495510475c3049ba8..6850921902e89dd7015125391349a0a96b7278bd 100644 (file)
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -3,6 +3,8 @@ Tue Sep  7 13:28:59 1999  Jeffrey A Law  (law@cygnus.com)
        * config/tc-hppa.c (pa_ip): Put strict register checks before
        call to pa_parse_number.
 
+       * config/tc-hppa.c (pa_ip): Support 'Z' argument.
+
 1999-09-06  Ian Lance Taylor  <ian@zembu.com>
 
        * config/obj-coff.c: Add ATTRIBUTE_UNUSED as needed for

diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 5f938c5df44c91a029a8af59757326094cdc76dc..823238f7d642ea8b88e968913f34011f4a6cc0a7 100644 (file)
--- a/gas/config/tc-hppa.c
+++ b/gas/config/tc-hppa.c
@@ -2830,6 +2830,17 @@ pa_ip (str)
                  continue;
                }
 
+           /* Handle '%r1' implicit operand of addil instruction.  */
+           case 'Z':
+             if (*s == ',' && *(s + 1) == '%' && *(s + 3) == '1'
+                 && (*(s + 2) == 'r' || *(s + 2) == 'R'))
+               {
+                 s += 4;
+                 continue;
+               }
+             else
+               break;
+
            /* Handle a 2 bit shift count at 25.  */
            case '.':
              num = pa_get_absolute_expression (&the_insn, &s);