From e5123d087ed24066c03c97c92a15d255c8d318dd Mon Sep 17 00:00:00 2001 From: Thomas Schwinge Date: Mon, 6 May 2013 10:23:02 +0200 Subject: 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 --- libgcc/fp-bit.c | 15 ++++++++++++--- 1 file changed, 12 insertions(+), 3 deletions(-) (limited to 'libgcc/fp-bit.c') 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 -- cgit v1.1