Fix rintl() on signaling NaNs and unsupported formats.

1 files changed, 3 insertions, 5 deletions

diff --git a/lib/msun/src/s_rintl.c b/lib/msun/src/s_rintl.c
index 43a535a..b2a85b6 100644
--- a/lib/msun/src/s_rintl.c
+++ b/lib/msun/src/s_rintl.c
@@ -54,11 +54,9 @@ rintl(long double x)
 	u.e = x;
 
 	if (u.bits.exp >= BIAS + LDBL_MANT_DIG - 1) {
-		/*
-		 * The biased exponent is greater than the number of digits
-		 * in the mantissa, so x is inf, NaN, or an integer.
-		 */
-		return (x);
+		if (u.bits.exp == BIAS + LDBL_MAX_EXP)
+			return (x + x);	/* Inf, NaN, or unsupported format */
+		return (x);		/* finite and already an integer */
 	}
 	sign = u.bits.sign;