From d14158a7543671d24819dd39fa1ded0e8ce08d89 Mon Sep 17 00:00:00 2001
From: eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 14 Apr 2004 02:32:15 +0000
Subject: * numeric.c (flo_eq): workaround for bcc32's bug.  
 (ruby-bugs-ja:PR#594)

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@6157 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 5 +++++
 numeric.c | 3 +++
 2 files changed, 8 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 8ec8b9221..1a0757697 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Wed Apr 14 11:29:56 2004  WATANABE Hirofumi  <eban@ruby-lang.org>
+
+	* numeric.c (flo_eq): workaround for bcc32's bug.
+	  (ruby-bugs-ja:PR#594)
+
 Wed Apr 14 10:57:40  Hirokazu Yamamoto  <ocean@m2.ccsnet.ne.jp>
 
 	* defines.h: include <net/socket.h> to get fd_set definition in BeOS.
diff --git a/numeric.c b/numeric.c
index 8c28e1707..9b96d1a20 100644
--- a/numeric.c
+++ b/numeric.c
@@ -843,6 +843,9 @@ flo_eq(x, y)
 	return num_equal(x, y);
     }
     a = RFLOAT(x)->value;
+#if defined __BORLANDC__
+    if (isnan(a) || isnan(b)) return Qfalse;
+#endif
     return (a == b)?Qtrue:Qfalse;
 }
 
-- 
cgit