1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* bignum.c (big_op): comparison of bignum and infinity has returned 1

Browse Source 
or -1, but it must return boolean.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@28815 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
mame 2010-08-01 01:12:54 +00:00
parent b6f174afdb
commit 6ad3f61663
3 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
Sun Aug 1 09:35:35 2010 Yusuke Endoh <mame@tsg.ne.jp>
* bignum.c (big_op): comparison of bignum and infinity has returned 1
or -1, but it must return boolean.
Sun Aug 1 09:44:25 2010 Tanaka Akira <akr@fsij.org> Sun Aug 1 09:44:25 2010 Tanaka Akira <akr@fsij.org>
* class.c (rb_include_module): don't clear the method cache if the * class.c (rb_include_module): don't clear the method cache if the

5
bignum.c
View File

@ -1453,8 +1453,9 @@ big_op(VALUE x, VALUE y, int op)
double a = RFLOAT_VALUE(y); double a = RFLOAT_VALUE(y);
if (isinf(a)) { if (isinf(a)) {
if (a > 0.0) return INT2FIX(-1); if (a > 0.0) rel = INT2FIX(-1);
else return INT2FIX(1); else rel = INT2FIX(1);
break;
} }
rel = rb_dbl_cmp(rb_big2dbl(x), a); rel = rb_dbl_cmp(rb_big2dbl(x), a);
break; break;

2
test/ruby/test_bignum.rb
View File

@ -185,6 +185,8 @@ class TestBignum < Test::Unit::TestCase
assert(T31P < T64P) assert(T31P < T64P)
assert(T64P > T31P) assert(T64P > T31P)
assert_raise(ArgumentError) { T31P < "foo" } assert_raise(ArgumentError) { T31P < "foo" }
assert(T64 < (1.0/0.0))
assert(!(T64 > (1.0/0.0)))
end end
def test_eq def test_eq