]>
git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/ieee754/ldbl-128/s_isinfl.c
5 #if defined(LIBM_SCCS) && !defined(lint)
6 static char rcsid
[] = "$NetBSD: $";
10 * isinfl(x) returns 1 if x is inf, -1 if x is -inf, else 0;
15 #include <math_private.h>
18 __isinfl (_Float128 x
)
21 GET_LDOUBLE_WORDS64(hx
,lx
,x
);
22 lx
|= (hx
& 0x7fffffffffffffffLL
) ^ 0x7fff000000000000LL
;
24 return ~(lx
>> 63) & (hx
>> 62);
26 mathx_hidden_def (__isinfl
)
27 weak_alias (__isinfl
, isinfl
)