mips.md: Use dconst1, not 1.0, as first argument of REAL_VALUE_LDEXP.

	* mips.md: Use dconst1, not 1.0, as first argument of
	REAL_VALUE_LDEXP.  Don't use union real_extract.

From-SVN: r51502

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 7dac70f89f3a7f9183500a2719c57848becd3ad9..338c6b14073c403b9d212407c3cdfd49c13eebe1 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2002-03-27  Zack Weinberg  <zack@codesourcery.com>
+
+       * mips.md: Use dconst1, not 1.0, as first argument of
+       REAL_VALUE_LDEXP.  Don't use union real_extract.
+
 2002-03-28  Alan Modra  <amodra@bigpond.net.au>
 
        * configure.in (gcc_cv_as): Use $target_alias in directory searchs

diff --git a/gcc/config/mips/mips.md b/gcc/config/mips/mips.md
index 3f1cdd02bf6a89f0a4362cd3baaa5e55ad55b39b..fbaf63faf7f1c05a40702c0b30c6fa2088133c2e 100644 (file)
--- a/gcc/config/mips/mips.md
+++ b/gcc/config/mips/mips.md
@@ -4504,7 +4504,7 @@ move\\t%0,%z4\\n\\
   rtx reg3 = gen_reg_rtx (SImode);
   rtx label1 = gen_label_rtx ();
   rtx label2 = gen_label_rtx ();
-  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (1.0, 31);
+  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (dconst1, 31);
 
   if (reg1)                    /* turn off complaints about unreached code */
     {
@@ -4548,7 +4548,7 @@ move\\t%0,%z4\\n\\
   rtx reg3 = gen_reg_rtx (DImode);
   rtx label1 = gen_label_rtx ();
   rtx label2 = gen_label_rtx ();
-  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (1.0, 63);
+  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (dconst1, 63);
 
   if (reg1)                    /* turn off complaints about unreached code */
     {
@@ -4592,7 +4592,7 @@ move\\t%0,%z4\\n\\
   rtx reg3 = gen_reg_rtx (SImode);
   rtx label1 = gen_label_rtx ();
   rtx label2 = gen_label_rtx ();
-  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (1.0, 31);
+  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (dconst1, 31);
 
   if (reg1)                    /* turn off complaints about unreached code */
     {
@@ -4636,7 +4636,7 @@ move\\t%0,%z4\\n\\
   rtx reg3 = gen_reg_rtx (DImode);
   rtx label1 = gen_label_rtx ();
   rtx label2 = gen_label_rtx ();
-  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (1.0, 63);
+  REAL_VALUE_TYPE offset = REAL_VALUE_LDEXP (dconst1, 63);
 
   if (reg1)                    /* turn off complaints about unreached code */
     {
@@ -10616,12 +10616,12 @@ ld\\t%2,%1-%S1(%2)\;daddu\\t%2,%2,$31\\n\\t%*j\\t%2"
   "TARGET_MIPS16"
   "*
 {
-  union real_extract u;
+  REAL_VALUE_TYPE d;
 
   if (GET_CODE (operands[0]) != CONST_DOUBLE)
     abort ();
-  memcpy (&u, &CONST_DOUBLE_LOW (operands[0]), sizeof u);
-  assemble_real (u.d, SFmode, GET_MODE_ALIGNMENT (SFmode));
+  REAL_VALUE_FROM_CONST_DOUBLE (d, operands[0]);
+  assemble_real (d, SFmode, GET_MODE_ALIGNMENT (SFmode));
   return \"\";
 }"
   [(set_attr "type"    "unknown")
@@ -10633,12 +10633,12 @@ ld\\t%2,%1-%S1(%2)\;daddu\\t%2,%2,$31\\n\\t%*j\\t%2"
   "TARGET_MIPS16"
   "*
 {
-  union real_extract u;
+  REAL_VALUE_TYPE d;
 
   if (GET_CODE (operands[0]) != CONST_DOUBLE)
     abort ();
-  memcpy (&u, &CONST_DOUBLE_LOW (operands[0]), sizeof u);
-  assemble_real (u.d, DFmode, GET_MODE_ALIGNMENT (DFmode));
+  REAL_VALUE_FROM_CONST_DOUBLE (d, operands[0]);
+  assemble_real (d, DFmode, GET_MODE_ALIGNMENT (DFmode));
   return \"\";
 }"
   [(set_attr "type"    "unknown")