* config/tc-hppa.c (pa-ip, case 'z'): Make field selectors work

[deliverable/binutils-gdb.git] / gas / config / tc-hppa.c

diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 184f4f006f7f2578d7a0317f3ca5338ec11f38a3..d730b459034d947d4ce9c06fa6954b6b14174023 100644 (file)
--- a/gas/config/tc-hppa.c
+++ b/gas/config/tc-hppa.c
@@ -2320,7 +2320,9 @@ pa_ip (str)
                {
                  unsigned int w2, w1, w, result;
 
-                 sign_unext (the_insn.exp.X_add_number >> 2, 17, &result);
+                 result = evaluate_absolute (the_insn.exp,
+                                             the_insn.field_selector);
+                 sign_unext (result >> 2, 17, &result);
                  dis_assemble_17 (result, &w1, &w2, &w);
                  opcode |= ((w2 << 2) | (w1 << 16) | w);
                }