fp-bit.c (unpack_d): Handle pair of doubles with different signs correctly.

* config/fp-bit.c (unpack_d): Handle pair of doubles with different signs correctly. From-SVN: r65405

fp-bit.c (unpack_d): Handle pair of doubles with different signs correctly.
* config/fp-bit.c (unpack_d): Handle pair of doubles with different signs correctly. From-SVN: r65405
9c951124 · Alexandre Oliva · Alexandre Oliva · d1c9693e · 9c951124 · 9c951124
Commit 9c951124 authored Apr 09, 2003 by Alexandre Oliva Committed by Alexandre Oliva Apr 09, 2003
Hide whitespace changes
Inline Side-by-side

Showing with 10 additions and 1 deletions

gcc/ChangeLog
+5 -0

gcc/config/fp-bit.c
+5 -1

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+2003-04-09  Alexandre Oliva  <aoliva@redhat.com>
+
+	* config/fp-bit.c (unpack_d): Handle pair of doubles with
+	different signs correctly.
+
 2003-04-09  Vladimir Makarov  <vmakarov@redhat.com>

 	* sched-deps.c (reg_pending_barrier_mode): New enumeration.

--- a/gcc/config/fp-bit.c
+++ b/gcc/config/fp-bit.c
@@ -459,6 +459,7 @@ unpack_d (FLO_union_type * src, fp_number_type * dst)
   if (exp != EXPMAX && exp != 0 && low != 0)
     {
       int lowexp = ((int)(low >> HALFFRACBITS)) & ((1 << EXPBITS) - 1);
+       int lowsign = ((int)(low >> (((HALFFRACBITS + EXPBITS))))) & 1;
       int shift;
       fractype xlow;

@@ -472,7 +473,10 @@ unpack_d (FLO_union_type * src, fp_number_type * dst)
 	 xlow <<= shift;
       else if (shift < 0)
 	 xlow >>= -shift;
-       fraction += xlow;
+       if (sign == lowsign)
+	 fraction += xlow;
+       else
+	 fraction -= xlow;
     }
 }
 # else