From: Jeff Law <law@redhat.com>
Date: Sun, 7 Nov 1993 09:03:59 +0000 (+0000)
Subject:         * config/tc-hppa.c (pa-ip, case 'z'): Make field selectors work
X-Git-Url: http://drtracing.org/?a=commitdiff_plain;h=163aac84bec07e12b9310313816131c6cc96a3dc;p=deliverable%2Fbinutils-gdb.git

    * config/tc-hppa.c (pa-ip, case 'z'): Make field selectors work
        for 'z' operands (target of ble branch).
---

diff --git a/gas/ChangeLog b/gas/ChangeLog
index 9deb19c2fd..fcc86470ed 100644
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Sun Nov  7 01:02:08 1993  Jeffrey A. Law  (law@snake.cs.utah.edu)
+
+	* config/tc-hppa.c (pa-ip, case 'z'): Make field selectors work
+	for 'z' operands (target of ble branch).
+
 Sat Nov  6 22:41:57 1993  Jeffrey A. Law  (law@snake.cs.utah.edu)
 
 	* config/tc-hppa.c: (update_subspace): Fix type and name of last
diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 184f4f006f..d730b45903 100644
--- 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);
 		}