mame	2010-01-27 00:21:25 +0900 (Wed, 27 Jan 2010)

  New Revision: 26432

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=26432

  Log:
    * ext/bigdecimal/bigdecimal.c (VpCtoV): do not raise infinity
      exception for BigDecimal("0E200000000000").

  Modified files:
    trunk/ChangeLog
    trunk/ext/bigdecimal/bigdecimal.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 26431)
+++ ChangeLog	(revision 26432)
@@ -1,3 +1,8 @@
+Wed Jan 27 00:19:30 2010  Yusuke Endoh  <mame@t...>
+
+	* ext/bigdecimal/bigdecimal.c (VpCtoV): do not raise infinity
+	  exception for BigDecimal("0E200000000000").
+
 Tue Jan 26 21:50:31 2010  Yusuke Endoh  <mame@t...>
 
 	* ext/bigdecimal/bigdecimal.c (VpCtoV): BigDecimal("0E200000000000")
Index: ext/bigdecimal/bigdecimal.c
===================================================================
--- ext/bigdecimal/bigdecimal.c	(revision 26431)
+++ ext/bigdecimal/bigdecimal.c	(revision 26432)
@@ -4079,9 +4079,11 @@
 	int zero = 1;
 	for(     ; i < mi && zero; i++) zero = int_chr[i] == '0';
 	for(i = 0; i < nf && zero; i++) zero = frac[i] == '0';
-	if(!zero && signe > 0) VpSetInf(a, sign);
+	if(!zero && signe > 0) {
+	    VpSetInf(a, sign);
+	    VpException(VP_EXCEPTION_INFINITY,"exponent overflow",0);
+	}
 	else VpSetZero(a, sign);
-        VpException(VP_EXCEPTION_INFINITY,"exponent overflow",0);
 	return 1;
     }
 

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/