diff options
Diffstat (limited to 'newlib/libm/mathfp/s_isinf.c')
-rw-r--r-- | newlib/libm/mathfp/s_isinf.c | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/newlib/libm/mathfp/s_isinf.c b/newlib/libm/mathfp/s_isinf.c deleted file mode 100644 index fe9f547..0000000 --- a/newlib/libm/mathfp/s_isinf.c +++ /dev/null @@ -1,37 +0,0 @@ - -/* @(#)z_isinf.c 1.0 98/08/13 */ -/****************************************************************** - * isinf - * - * Input: - * x - pointer to a floating point value - * - * Output: - * An integer that indicates if the number is infinite. - * - * Description: - * This routine returns an integer that indicates if the number - * passed in is infinite (1) or is finite (0). - * - *****************************************************************/ - -#include "fdlibm.h" -#include "zmath.h" - -#ifndef _DOUBLE_IS_32BITS - -int isinf (double x) -{ - __uint32_t lx, hx; - int exp; - - EXTRACT_WORDS (hx, lx, x); - exp = (hx & 0x7ff00000) >> 20; - - if ((exp == 0x7ff) && ((hx & 0xf0000 || lx) == 0)) - return (1); - else - return (0); -} - -#endif /* _DOUBLE_IS_32BITS */ |