summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ChangeLog8
-rw-r--r--bcc32/Makefile.sub3
-rw-r--r--win32/win32.c4
-rw-r--r--win32/win32.h3
4 files changed, 13 insertions, 5 deletions
diff --git a/ChangeLog b/ChangeLog
index a23821e..1b1a09e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+Sun Apr 20 23:24:25 2003 WATANABE Hirofumi <eban@ruby-lang.org>
+
+ * win32/win32.c (NtInitialize): set the floating-point control word
+ on bcc32.
+
+ * win32/win32.h, bcc32/Makefile.sub: use missing/isinf.c, should not
+ use _finite() because it returns 0 if NaN.
+
Sun Apr 20 03:09:30 2003 WATANABE Hirofumi <eban@ruby-lang.org>
* parse.y (void_expr0): node might become NULL after calling
diff --git a/bcc32/Makefile.sub b/bcc32/Makefile.sub
index f17c3d2..ca63aa8 100644
--- a/bcc32/Makefile.sub
+++ b/bcc32/Makefile.sub
@@ -102,7 +102,7 @@ RFLAGS = $(iconinc)
EXTLIBS =
!endif
LIBS = cw32.lib import32.lib ws2_32.lib $(EXTLIBS)
-MISSING = acosh.obj crypt.obj win32.obj
+MISSING = acosh.obj crypt.obj win32.obj isinf.obj
!ifndef STACK
STACK = 0x2000000
@@ -270,7 +270,6 @@ config.h:
\#define SIZEOF_DOUBLE 8
\#define HAVE_DECL_SYS_NERR 1
-\#define HAVE_ISINF 1
\#define HAVE_ISNAN 1
\#define HAVE_MEMMOVE 1
\#define HAVE_MKDIR 1
diff --git a/win32/win32.c b/win32/win32.c
index ab9a438..c0aff25 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -363,6 +363,10 @@ NtInitialize(int *argc, char ***argv)
WORD version;
int ret;
+#ifdef __BORLANDC__
+ _controlfp(0x5, 0x5);
+#endif
+
//
// subvert cmd.exe's feeble attempt at command line parsing
//
diff --git a/win32/win32.h b/win32/win32.h
index f8bf377..b378fb2 100644
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -177,9 +177,6 @@ extern pid_t rb_w32_getpid(void);
#ifdef __BORLANDC__
#include <float.h>
-#ifndef isinf
-#define isinf !_finite
-#endif
#ifndef isnan
#define isnan _isnan
#endif