X-Git-Url: http://nsz.repo.hu/git/?p=libm;a=blobdiff_plain;f=src%2Fmath%2F__fpclassifyl.c;h=a5ad36f2c2196e76a5b0a287b3c759bb298978c7;hp=c886e5a1141f46a4d6f8750ae348485c1ffd7582;hb=f1278a53fcf066facd97c8c782a412b39d0f2bc4;hpb=21d0f5c85063b4e1f8168fc53fb4238d78375f08 diff --git a/src/math/__fpclassifyl.c b/src/math/__fpclassifyl.c index c886e5a..a5ad36f 100644 --- a/src/math/__fpclassifyl.c +++ b/src/math/__fpclassifyl.c @@ -10,7 +10,7 @@ int __fpclassifyl(long double x) if (!e) return u.bits.m ? FP_SUBNORMAL : FP_ZERO; if (e == 0x7fff) - return u.bits.m & ~((uint64_t)1<<63) ? FP_NAN : FP_INFINITE; + return u.bits.m & (uint64_t)-1>>1 ? FP_NAN : FP_INFINITE; return u.bits.m & (uint64_t)1<<63 ? FP_NORMAL : FP_NAN; } #elif LDBL_MANT_DIG == 113 && LDBL_MAX_EXP == 16384