musl - musl - an implementation of the standard library for Linux-based systems

diff --git a/src/math/__fpclassifyl.c b/src/math/__fpclassifyl.c
index 6365c588..6dc10025 100644
--- a/src/math/__fpclassifyl.c
+++ b/src/math/__fpclassifyl.c

@@ -3,13 +3,15 @@

#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024

#elif LDBL_MANT_DIG == 64 && LDBL_MAX_EXP == 16384

-/* invalid representations (top bit of u.i.m is wrong) are not handled */

int __fpclassifyl(long double x)

{

union ldshape u = {x};

int e = u.i.se & 0x7fff;

- if (!e)

+ int msb = u.i.m>>63;

+ if (!e && !msb)

return u.i.m ? FP_SUBNORMAL : FP_ZERO;

+ if (!msb)

+ return FP_NAN;

if (e == 0x7fff)

return u.i.m << 1 ? FP_NAN : FP_INFINITE;

return FP_NORMAL;