toolchain/gcc/newlib/libm/math/sf_isinf.c

   1 /*
   2  * isinff(x) returns 1 if x is +-infinity, else 0;
   3  * Added by Cygnus Support.
   4  */
   5
   6 #include "fdlibm.h"
   7
   8 #ifdef __STDC__
   9         int isinff(float x)
  10 #else
  11         int isinff(x)
  12         float x;
  13 #endif
  14 {
  15         __int32_t ix;
  16         GET_FLOAT_WORD(ix,x);
  17         ix &= 0x7fffffff;
  18         return FLT_UWORD_IS_INFINITE(ix);
  19 }
  20
  21 #ifdef _DOUBLE_IS_32BITS
  22
  23 #ifdef __STDC__
  24         int isinf(double x)
  25 #else
  26         int isinf(x)
  27         double x;
  28 #endif
  29 {
  30         return isinff((float) x);
  31 }
  32
  33 #endif /* defined(_DOUBLE_IS_32BITS) */