not, write to the Free Software Foundation, Inc., 675 Mass Ave,
Cambridge, MA 02139, USA. */
-#include <crtdll/math.h>
-#include <crtdll/float.h>
-#include <crtdll/internal/ieee.h>
+#include <msvcrt/math.h>
+#include <msvcrt/float.h>
+#include <msvcrt/internal/ieee.h>
+
int _isnan(double __x)
{
- double_t * x = (double_t *)&__x;
- return ( x->exponent == 0x7ff && ( x->mantissah != 0 || x->mantissal != 0 ));
+ double_t* x = (double_t*)&__x;
+ return (x->exponent == 0x7ff && (x->mantissah != 0 || x->mantissal != 0));
}
int _isnanl(long double __x)
{
-
/* Intel's extended format has the normally implicit 1 explicit
present. Sigh! */
- long_double_t * x = (long_double_t *)&__x;
+ long_double_t* x = (long_double_t*)&__x;
/* IEEE 854 NaN's have the maximum possible
exponent and a nonzero mantissa. */
return (( x->exponent == 0x7fff)
- && ( (x->mantissah & 0x80000000) != 0)
- && ( (x->mantissah & (unsigned int)0x7fffffff) != 0 || x->mantissal != 0 ));
+ && ((x->mantissah & 0x80000000) != 0)
+ && ((x->mantissah & (unsigned int)0x7fffffff) != 0 || x->mantissal != 0));
}
-
int _isinf(double __x)
{
- double_t * x = (double_t *)&__x;
- return ( x->exponent == 0x7ff && ( x->mantissah == 0 && x->mantissal == 0 ));
+ double_t* x = (double_t*)&__x;
+ return (x->exponent == 0x7ff && (x->mantissah == 0 && x->mantissal == 0));
}
-
-
-int _finite( double x )
+int _finite(double x)
{
return !_isinf(x);
}
/* Intel's extended format has the normally implicit 1 explicit
present. Sigh! */
- long_double_t * x = (long_double_t *)&__x;
+ long_double_t* x = (long_double_t*)&__x;
/* An IEEE 854 infinity has an exponent with the
maximum possible value and a zero mantissa. */
- if ( x->exponent == 0x7fff && ( (x->mantissah == 0x80000000 ) && x->mantissal == 0 ))
+ if (x->exponent == 0x7fff && ((x->mantissah == 0x80000000) && x->mantissal == 0))
return x->sign ? -1 : 1;
return 0;
}
-
-