1991-06-04 15:33:34 +00:00
|
|
|
__IsNan(double d)
|
|
|
|
{
|
1991-08-27 08:57:28 +00:00
|
|
|
#if defined(__vax) || defined(__pdp)
|
1991-06-04 15:33:34 +00:00
|
|
|
#else
|
|
|
|
float f = d;
|
|
|
|
|
2018-06-21 20:33:47 +00:00
|
|
|
if ((*((long*)&f) & 0x7f800000) == 0x7f800000 && (*((long*)&f) & 0x007fffff) != 0)
|
|
|
|
return 1;
|
1991-06-04 15:33:34 +00:00
|
|
|
#endif
|
|
|
|
return 0;
|
|
|
|
}
|