diff options
Diffstat (limited to 'newlib/libm/common/s_fpclassify.c')
-rw-r--r-- | newlib/libm/common/s_fpclassify.c | 52 |
1 files changed, 0 insertions, 52 deletions
diff --git a/newlib/libm/common/s_fpclassify.c b/newlib/libm/common/s_fpclassify.c deleted file mode 100644 index 0911915ff..000000000 --- a/newlib/libm/common/s_fpclassify.c +++ /dev/null @@ -1,52 +0,0 @@ -/* Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved. - * - * Permission to use, copy, modify, and distribute this software - * is freely granted, provided that this notice is preserved. - */ - -#include "fdlibm.h" - -int -__fpclassifyf (float x) -{ - unsigned int w; - - GET_FLOAT_WORD(w,x); - - if (w == 0x00000000 || w == 0x80000000) - return FP_ZERO; - else if ((w >= 0x00800000 && w <= 0x7f7fffff) || - (w >= 0xff7fffff && w <= 0x80800000)) - return FP_NORMAL; - else if ((w >= 0x00000001 && w <= 0x007fffff) || - (w >= 0x807fffff && w <= 0x80000001)) - return FP_SUBNORMAL; - else if (w == 0x7f800000 || w == 0xff800000) - return FP_INFINITE; - else - return FP_NAN; -} - -int -__fpclassifyd (double x) -{ - unsigned int msw, lsw; - - EXTRACT_WORDS(msw,lsw,x); - - if ((msw == 0x00000000 && lsw == 0x00000000) || - (msw == 0x80000000 && lsw == 0x00000000)) - return FP_ZERO; - else if ((msw >= 0x00100000 && msw <= 0x7fefffff) || - (msw >= 0xffefffff && msw <= 0x80100000)) - return FP_NORMAL; - else if ((msw >= 0x00000000 && msw <= 0x000fffff) || - (msw >= 0x800fffff && msw <= 0x80000000)) - /* zero is already handled above */ - return FP_SUBNORMAL; - else if ((msw == 0x7ff00000 && lsw == 0x00000000) || - (msw == 0xfff00000 && lsw == 0x00000000)) - return FP_INFINITE; - else - return FP_NAN; -} |