diff options
| author | Thomas Schwinge <thomas@codesourcery.com> | 2013-05-06 10:23:02 +0200 |
|---|---|---|
| committer | Thomas Schwinge <tschwinge@gcc.gnu.org> | 2013-05-06 10:23:02 +0200 |
| commit | e5123d087ed24066c03c97c92a15d255c8d318dd (patch) | |
| tree | e05b2f2fcb768975dd4c02f9879f967e78f0832d /libgcc/fp-bit.c | |
| parent | 701e2f0a76da581d75fa3adac925d58aff7a1290 (diff) | |
| download | gcc-e5123d087ed24066c03c97c92a15d255c8d318dd.tar.gz | |
fp-bit.c (unpack_d, pack_d): Properly preserve and restore a NaN's payload.
libgcc/
* fp-bit.c (unpack_d, pack_d): Properly preserve and restore a
NaN's payload.
From-SVN: r198622
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 60f23387e81..9b0c194604f 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 |