From a5559dbc829b3c8e1ea5a7120f3c14397e547ecf Mon Sep 17 00:00:00 2001
From: Richard Earnshaw <erich@gnu.org>
Date: Mon, 19 Feb 1996 11:57:13 +0000
Subject: [PATCH] (operand_subword): For 32-bit targets, return the appropriate
 subword of extended precision CONST_DOUBLEs.

From-SVN: r11300
---
 gcc/emit-rtl.c | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/gcc/emit-rtl.c b/gcc/emit-rtl.c
index 748bb29662d..f04ba5f3100 100644
--- a/gcc/emit-rtl.c
+++ b/gcc/emit-rtl.c
@@ -1157,6 +1157,20 @@ operand_subword (op, i, validate_address, mode)
       else
 	abort ();
     }
+  else if (HOST_BITS_PER_WIDE_INT >= BITS_PER_WORD
+	   && GET_MODE_CLASS (mode) == MODE_FLOAT
+	   && GET_MODE_BITSIZE (mode) > 64
+	   && GET_CODE (op) == CONST_DOUBLE)
+  {
+    long k[4];
+    REAL_VALUE_TYPE rv;
+
+    REAL_VALUE_FROM_CONST_DOUBLE (rv, op);
+    REAL_VALUE_TO_TARGET_LONG_DOUBLE (rv, k);
+
+    if (BITS_PER_WORD == 32)
+      return GEN_INT ((HOST_WIDE_INT) k[i]);
+  }
 #else /* no REAL_ARITHMETIC */
   if (((HOST_FLOAT_FORMAT == TARGET_FLOAT_FORMAT
 	&& HOST_BITS_PER_WIDE_INT == BITS_PER_WORD)
-- 
2.30.2