X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2F__fpclassifyl.c;h=a4e354ce11ddbd54528cd4775aa507e29828fa33;hb=35620515a8ce0f83f0467968f01383c8f53d44dc;hp=4f93bef17f6e46c821ba882241303257bf6e0637;hpb=0b44a0315b47dd8eced9f3b7f31580cf14bbfc01;p=musl diff --git a/src/math/__fpclassifyl.c b/src/math/__fpclassifyl.c index 4f93bef1..a4e354ce 100644 --- a/src/math/__fpclassifyl.c +++ b/src/math/__fpclassifyl.c @@ -7,10 +7,10 @@ int __fpclassifyl(long double __x) union { long double __ld; __uint16_t __hw[5]; - __uint64_t __m; + int64_t __m; } __y = { __x }; int __ee = __y.__hw[4]&0x7fff; if (!__ee) return __y.__m ? FP_SUBNORMAL : FP_ZERO; if (__ee==0x7fff) return __y.__m ? FP_NAN : FP_INFINITE; - return FP_NORMAL; + return __y.__m < 0 ? FP_NORMAL : FP_NAN; }