Welcome to mirror list, hosted at ThFree Co, Russian Federation.

cygwin.com/git/newlib-cygwin.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'newlib/libm/common/s_fpclassify.c')
-rw-r--r--newlib/libm/common/s_fpclassify.c52
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;
-}