2001-03-06 08:17:54 +00:00
|
|
|
/* public domain rewrite of isnan(3) */
|
|
|
|
|
|
2000-01-17 08:37:53 +00:00
|
|
|
#ifdef _MSC_VER
|
|
|
|
|
|
|
|
|
|
#include <float.h>
|
|
|
|
|
int
|
|
|
|
|
isnan(n)
|
|
|
|
|
double n;
|
|
|
|
|
{
|
|
|
|
|
return _isnan(n);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#else
|
|
|
|
|
|
1999-08-13 05:45:20 +00:00
|
|
|
static int double_ne();
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
isnan(n)
|
|
|
|
|
double n;
|
|
|
|
|
{
|
|
|
|
|
return double_ne(n, n);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static
|
|
|
|
|
int
|
|
|
|
|
double_ne(n1, n2)
|
|
|
|
|
double n1, n2;
|
|
|
|
|
{
|
|
|
|
|
return n1 != n2;
|
|
|
|
|
}
|
2000-01-17 08:37:53 +00:00
|
|
|
#endif
|
