URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [trunk/] [newlib-1.10.0/] [newlib/] [libm/] [math/] [s_isinf.c] - Rev 1765
Compare with Previous | Blame | View Log
/* * isinf(x) returns 1 if x is infinity, else 0; * no branching! * Added by Cygnus Support. */ #include "fdlibm.h" #ifndef _DOUBLE_IS_32BITS #ifdef __STDC__ int isinf(double x) #else int isinf(x) double x; #endif { __int32_t hx,lx; EXTRACT_WORDS(hx,lx,x); hx &= 0x7fffffff; hx |= (__uint32_t)(lx|(-lx))>>31; hx = 0x7ff00000 - hx; return 1 - (int)((__uint32_t)(hx|(-hx))>>31); } #endif /* _DOUBLE_IS_32BITS */