Update copyright notices with scripts/update-copyrights
[glibc.git] / sysdeps / ieee754 / ldbl-128 / s_isinf_nsl.c
blob7d6cfb9a62a6d00b08687e33f5c3dddef5137bb9
1 /*
2 * Written by Ulrich Drepper <drepper@gmail.com>
3 */
5 /*
6 * __isinf_nsl(x) returns != 0 if x is ±inf, else 0;
7 * no branching!
8 */
10 #include <math.h>
11 #include <math_private.h>
13 int
14 __isinf_nsl (long double x)
16 int64_t hx,lx;
17 GET_LDOUBLE_WORDS64(hx,lx,x);
18 return !(lx | ((hx & 0x7fffffffffffffffLL) ^ 0x7fff000000000000LL));