akr	2008-07-03 16:48:09 +0900 (Thu, 03 Jul 2008)

  New Revision: 17842

  Modified files:
    branches/ruby_1_8/ChangeLog
    branches/ruby_1_8/ruby.h
    branches/ruby_1_8/test/ruby/test_float.rb

  Log:
    * include/ruby/ruby.h (POSFIXABLE): use FIXNUM_MAX+1 instead of
      FIXNUM_MAX to make it possible to convert to double accurately.
      It assumes FLT_RADIX is 2.
      fix RubyForge bug #14102.
      backported from 1.9.



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

Index: ruby_1_8/ChangeLog
===================================================================
--- ruby_1_8/ChangeLog	(revision 17841)
+++ ruby_1_8/ChangeLog	(revision 17842)
@@ -1,3 +1,11 @@
+Thu Jul  3 16:46:56 2008  Tanaka Akira  <akr@f...>
+
+	* include/ruby/ruby.h (POSFIXABLE): use FIXNUM_MAX+1 instead of
+	  FIXNUM_MAX to make it possible to convert to double accurately.
+	  It assumes FLT_RADIX is 2.
+	  fix RubyForge bug #14102.
+	  backported from 1.9.
+
 Thu Jul  3 16:08:36 2008  Tanaka Akira  <akr@f...>
 
 	* configure.in (erfc): erfc of glibc comes with Debian GNU/Linux Etch
Index: ruby_1_8/ruby.h
===================================================================
--- ruby_1_8/ruby.h	(revision 17841)
+++ ruby_1_8/ruby.h	(revision 17842)
@@ -166,7 +166,7 @@
 #define FIX2LONG(x) RSHIFT((long)x,1)
 #define FIX2ULONG(x) (((unsigned long)(x))>>1)
 #define FIXNUM_P(f) (((long)(f))&FIXNUM_FLAG)
-#define POSFIXABLE(f) ((f) <= FIXNUM_MAX)
+#define POSFIXABLE(f) ((f) < FIXNUM_MAX+1)
 #define NEGFIXABLE(f) ((f) >= FIXNUM_MIN)
 #define FIXABLE(f) (POSFIXABLE(f) && NEGFIXABLE(f))
 
Index: ruby_1_8/test/ruby/test_float.rb
===================================================================
--- ruby_1_8/test/ruby/test_float.rb	(revision 17841)
+++ ruby_1_8/test/ruby/test_float.rb	(revision 17842)
@@ -110,4 +110,38 @@
     assert_equal(-3.5, (-11.5).remainder(4))
     assert_equal(-3.5, (-11.5).remainder(-4))
   end
+
+  def test_to_i
+    assert_operator(4611686018427387905.0.to_i, :>, 0)
+    assert_operator(4611686018427387904.0.to_i, :>, 0)
+    assert_operator(4611686018427387903.8.to_i, :>, 0)
+    assert_operator(4611686018427387903.5.to_i, :>, 0)
+    assert_operator(4611686018427387903.2.to_i, :>, 0)
+    assert_operator(4611686018427387903.0.to_i, :>, 0)
+    assert_operator(4611686018427387902.0.to_i, :>, 0)
+
+    assert_operator(1073741825.0.to_i, :>, 0)
+    assert_operator(1073741824.0.to_i, :>, 0)
+    assert_operator(1073741823.8.to_i, :>, 0)
+    assert_operator(1073741823.5.to_i, :>, 0)
+    assert_operator(1073741823.2.to_i, :>, 0)
+    assert_operator(1073741823.0.to_i, :>, 0)
+    assert_operator(1073741822.0.to_i, :>, 0)
+
+    assert_operator((-1073741823.0).to_i, :<, 0)
+    assert_operator((-1073741824.0).to_i, :<, 0)
+    assert_operator((-1073741824.2).to_i, :<, 0)
+    assert_operator((-1073741824.5).to_i, :<, 0)
+    assert_operator((-1073741824.8).to_i, :<, 0)
+    assert_operator((-1073741825.0).to_i, :<, 0)
+    assert_operator((-1073741826.0).to_i, :<, 0)
+
+    assert_operator((-4611686018427387903.0).to_i, :<, 0)
+    assert_operator((-4611686018427387904.0).to_i, :<, 0)
+    assert_operator((-4611686018427387904.2).to_i, :<, 0)
+    assert_operator((-4611686018427387904.5).to_i, :<, 0)
+    assert_operator((-4611686018427387904.8).to_i, :<, 0)
+    assert_operator((-4611686018427387905.0).to_i, :<, 0)
+    assert_operator((-4611686018427387906.0).to_i, :<, 0)
+  end
 end

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