X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=src%2Fmath%2F__fpclassifyl.c;fp=src%2Fmath%2F__fpclassifyl.c;h=4f4f37a7eac6ee8a463c1245a9b5bfefe69282ee;hb=f6fd351c703a2843959b3be83078d9dce33f30f3;hp=4f93bef17f6e46c821ba882241303257bf6e0637;hpb=e5cb55fedd811f71cd91ef097a8a4a4964d8c564;p=musl diff --git a/src/math/__fpclassifyl.c b/src/math/__fpclassifyl.c index 4f93bef1..4f4f37a7 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; }