From f8bd0bc7e6bbf6122f8011a308d484e6d59a403d Mon Sep 17 00:00:00 2001
From: eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 14 Apr 2004 06:05:41 +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/branches/ruby_1_8@6159 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 5 +++++
 numeric.c | 3 +++
 2 files changed, 8 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index e52327700..728696eae 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 13:06:35 2004  Doug Kearns  <djkea2@mugca.its.monash.edu.au>
 
 	* array.c, enum.c, eval.c, file.c, io.c, numeric.c, object.c, prec.c,
diff --git a/numeric.c b/numeric.c
index 4adaa6e1d..513b43b48 100644
--- a/numeric.c
+++ b/numeric.c
@@ -842,6 +842,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