From: Richard Stallman <rms@gnu.org>
Date: Sat, 7 Mar 1992 07:18:44 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: misc/cutover-egcs-0~13521
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=05795922a259e1b382c48742c36b293c855ddea7;p=thirdparty%2Fgcc.git

*** empty log message ***

From-SVN: r410
---

diff --git a/gcc/config/i860/i860.c b/gcc/config/i860/i860.c
index 2b1828dd9bae..c4c75ca54137 100644
--- a/gcc/config/i860/i860.c
+++ b/gcc/config/i860/i860.c
@@ -1614,21 +1614,17 @@ unsigned long
 sfmode_constant_to_ulong (x)
      rtx x;
 {
-  union { double d; unsigned long i[2]; } u;
+  REAL_VALUE_TYPE d;
   union { float f; unsigned long i; } u2;
 
   if (GET_CODE (x) != CONST_DOUBLE || GET_MODE (x) != SFmode)
     abort ();
 
-#ifndef HOST_WORDS_BIG_ENDIAN
-  u.i[0] = CONST_DOUBLE_LOW (x);
-  u.i[1] = CONST_DOUBLE_HIGH (x);
-#else
-  u.i[0] = CONST_DOUBLE_HIGH (x);
-  u.i[1] = CONST_DOUBLE_LOW (x);
+#if TARGET_FLOAT_FORMAT != HOST_FLOAT_FORMAT
+# error IEEE emulation needed
 #endif
-
-  u2.f = u.d;
+  REAL_VALUE_FROM_CONST_DOUBLE (u.d, x);
+  u2.f = d;
   return u2.i;
 }