Mercurial > hg > CbC > CbC_gcc
diff libquadmath/math/finiteq.c @ 145:1830386684a0
gcc-9.2.0
author | anatofuz |
---|---|
date | Thu, 13 Feb 2020 11:34:05 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line diff
--- a/libquadmath/math/finiteq.c Thu Oct 25 07:37:49 2018 +0900 +++ b/libquadmath/math/finiteq.c Thu Feb 13 11:34:05 2020 +0900 @@ -1,4 +1,4 @@ -/* finiteq.c -- __float128 version of s_finite.c. +/* s_finitel.c -- long double version of s_finite.c. * Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz. */ @@ -13,18 +13,21 @@ * ==================================================== */ -#include "quadmath-imp.h" +#if defined(LIBM_SCCS) && !defined(lint) +static char rcsid[] = "$NetBSD: $"; +#endif /* * finiteq(x) returns 1 is x is finite, else 0; * no branching! */ -int -finiteq (const __float128 x) +#include "quadmath-imp.h" + +int finiteq(__float128 x) { - int64_t hx; - GET_FLT128_MSW64(hx,x); - return (int)((uint64_t)((hx&0x7fff000000000000LL) - -0x7fff000000000000LL)>>63); + int64_t hx; + GET_FLT128_MSW64(hx,x); + return (int)((uint64_t)((hx&0x7fff000000000000LL) + -0x7fff000000000000LL)>>63); }