From: Jeff Law <law@redhat.com>
Date: Wed, 28 Jul 1999 08:07:14 +0000 (+0000)
Subject:         * config/tc-hppa.c (pa_ip):  Add 'J' and 'K' code
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=b53fcc20b19699d16c64c5fb0fb311ba17c19a67;p=binutils-gdb.git

    * config/tc-hppa.c (pa_ip):  Add 'J' and 'K' code
        processing.
---

diff --git a/gas/ChangeLog b/gas/ChangeLog
index d9a2e84d4ae..3b535ad5e07 100644
--- a/gas/ChangeLog
+++ b/gas/ChangeLog
@@ -1,3 +1,8 @@
+Wed Jul 28 02:04:24 1999  "Jerry Quinn" <jquinn@nortelnetworks.com>
+
+	* config/tc-hppa.c (pa_ip):  Add 'J' and 'K' code
+	processing. 
+
 1999-07-27  Ian Lance Taylor  <ian@zembu.com>
 
 	* config/tc-sparc.h (tc_fix_adjustable): Don't adjust GOT, PLT, or
diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c
index 82e07d3535c..073e9e63e87 100644
--- a/gas/config/tc-hppa.c
+++ b/gas/config/tc-hppa.c
@@ -2468,6 +2468,18 @@ pa_ip (str)
 		continue;
 	      }
 
+	    /* Float operand 1 similar to 'b' but with l/r registers.  */
+	    case 'J':
+	      {
+		struct pa_11_fp_reg_struct result;
+
+		pa_parse_number (&s, &result);
+		CHECK_FIELD (result.number_part, 31, 0, 0);
+		opcode |= result.number_part << 21;
+		opcode |= (result.l_r_select & 1) << 7;
+		continue;
+	      }
+
 	    /* Handle L/R register halves like 'b'.  */
 	    case '3':
 	      {
@@ -2513,6 +2525,18 @@ pa_ip (str)
 		continue;
 	      }
 
+	    /* Float operand 2, like 'x' but with l/r register halves.  */
+	    case 'K':
+	      {
+		struct pa_11_fp_reg_struct result;
+
+		pa_parse_number (&s, &result);
+		CHECK_FIELD (result.number_part, 31, 0, 0);
+		opcode |= (result.number_part & 0x1f) << 16;
+		opcode |= (result.l_r_select & 1) << 12;
+		continue;
+	      }
+
 	    /* Handle a 5 bit register field at 10.  */
 	    case '4':
 	      {