Reveal Borland's isnan.

[p5sagit/p5-mst-13.2.git] / win32 / win32.h

diff --git a/win32/win32.h b/win32/win32.h
index eb5ecd2..61884ab 100644 (file)
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -159,6 +159,11 @@ struct utsname {
 #  define      F_OK    0
 #endif
 
+/* for waitpid() */
+#ifndef WNOHANG
+#  define WNOHANG      1
+#endif
+
 #define PERL_GET_CONTEXT_DEFINED
 
 /* Compiler-specific stuff. */
@@ -194,6 +199,8 @@ struct utsname {
 /* Borland C thinks that a pointer to a member variable is 12 bytes in size. */
 #define PERL_MEMBER_PTR_SIZE   12
 
+#define isnan          _isnan
+
 #endif
 
 #ifdef _MSC_VER                        /* Microsoft Visual C++ */
@@ -492,9 +499,5 @@ struct interp_intern {
  */
 #include "win32iop.h"
 
-#ifndef WNOHANG
-#  define WNOHANG 1
-#endif
-
 #endif /* _INC_WIN32_PERL5 */