From 538e8190bc68afcfd2f8308cb0e4c92394e93935 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 11 Jul 2003 07:10:14 +0000
Subject: [PATCH] * util.c (ruby_strtod): exp should be less than MDMAXEXPT.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4057 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ChangeLog | 4 ++++
 util.c    | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 87774c7b89..563da96328 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Fri Jul 11 16:09:09 2003  Yukihiro Matsumoto  <matz@ruby-lang.org>
+
+	* util.c (ruby_strtod): exp should be less than MDMAXEXPT.
+
 Thu Jul 10 14:42:02 2003  WATANABE Hirofumi  <eban@ruby-lang.org>
 
 	* math.c (math_log): nan takes a dummy argument on Cygwin 1.5.0.
diff --git a/util.c b/util.c
index ae2bc8de92..9b058e6114 100644
--- a/util.c
+++ b/util.c
@@ -859,7 +859,7 @@ ruby_strtod(string, endPtr)
 	 * fraction.
 	 */
     
-	if (exp > MDMAXEXPT - 18) {
+	if (exp >= MDMAXEXPT - 18) {
 	    exp = MDMAXEXPT;
 	    errno = ERANGE;
 	}