summaryrefslogtreecommitdiff
path: root/src/math/nextafterl.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/math/nextafterl.c')
-rw-r--r--src/math/nextafterl.c12
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