diff options
Diffstat (limited to 'src/math/nextafterl.c')
-rw-r--r-- | src/math/nextafterl.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/src/math/nextafterl.c b/src/math/nextafterl.c index c09d9dd0..edc3cc9c 100644 --- a/src/math/nextafterl.c +++ b/src/math/nextafterl.c @@ -38,10 +38,8 @@ long double nextafterl(long double x, long double y) if (ux.bits.exp == 0x7fff) return x + x; /* raise underflow if ux.value is subnormal or zero */ - if (ux.bits.exp == 0) { - volatile float z; - z = x*x + ux.value*ux.value; - } + if (ux.bits.exp == 0) + FORCE_EVAL(x*x + ux.value*ux.value); return ux.value; } #elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384 @@ -77,10 +75,8 @@ long double nextafterl(long double x, long double y) if (ux.bits.exp == 0x7fff) return x + x; /* raise underflow if ux.value is subnormal or zero */ - if (ux.bits.exp == 0) { - volatile float z; - z = x*x + ux.value*ux.value; - } + if (ux.bits.exp == 0) + FORCE_EVAL(x*x + ux.value*ux.value); return ux.value; } #endif |