diff options
Diffstat (limited to 'libgcc/fp-bit.c')
| -rw-r--r-- | libgcc/fp-bit.c | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/libgcc/fp-bit.c b/libgcc/fp-bit.c index 60f2338..9b0c194 100644 --- a/libgcc/fp-bit.c +++ b/libgcc/fp-bit.c @@ -213,11 +213,18 @@ pack_d (const fp_number_type *src) else if (isnan (src)) { exp = EXPMAX; + /* Restore the NaN's payload. */ + fraction >>= NGARDS; + fraction &= QUIET_NAN - 1; if (src->class == CLASS_QNAN || 1) { #ifdef QUIET_NAN_NEGATED - fraction |= QUIET_NAN - 1; + /* The quiet/signaling bit remains unset. */ + /* Make sure the fraction has a non-zero value. */ + if (fraction == 0) + fraction |= QUIET_NAN - 1; #else + /* Set the quiet/signaling bit. */ fraction |= QUIET_NAN; #endif } @@ -573,8 +580,10 @@ unpack_d (FLO_union_type * src, fp_number_type * dst) { dst->class = CLASS_SNAN; } - /* Keep the fraction part as the nan number */ - dst->fraction.ll = fraction; + /* Now that we know which kind of NaN we got, discard the + quiet/signaling bit, but do preserve the NaN payload. */ + fraction &= ~QUIET_NAN; + dst->fraction.ll = fraction << NGARDS; } } else |