diff options
Diffstat (limited to 'lib/msun')
-rw-r--r-- | lib/msun/ld128/s_expl.c | 2 | ||||
-rw-r--r-- | lib/msun/ld80/s_expl.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lib/msun/ld128/s_expl.c b/lib/msun/ld128/s_expl.c index a36d7af..a379ff0 100644 --- a/lib/msun/ld128/s_expl.c +++ b/lib/msun/ld128/s_expl.c @@ -261,7 +261,7 @@ expl(long double x) n2 = (unsigned)n % INTERVALS; k = n >> LOG2_INTERVALS; r1 = x - fn * L1; - r2 = -fn * L2; + r2 = fn * -L2; /* Prepare scale factors. */ v.xbits.manh = 0; diff --git a/lib/msun/ld80/s_expl.c b/lib/msun/ld80/s_expl.c index 26a378b..79c5110 100644 --- a/lib/msun/ld80/s_expl.c +++ b/lib/msun/ld80/s_expl.c @@ -275,10 +275,10 @@ expl(long double x) /* Depend on the sign bit being propagated: */ k = n >> LOG2_INTERVALS; r1 = x - fn * L1; - r2 = -fn * L2; + r2 = fn * -L2; /* Prepare scale factors. */ - v.xbits.man = 1ULL << 63; + v.e = 1ULL << 63; if (k >= LDBL_MIN_EXP) { v.xbits.expsign = BIAS + k; twopk = v.e; |