1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/test/ruby/test_comparable.rb
nobu 44c5c2a312 compar.c: inversed comarison without infinite recursion
* compar.c (rb_invcmp): compare by inversed comarison, with preventing
  from infinite recursion.  [ruby-core:52305] [Bug #7870]
* string.c (rb_str_cmp_m), time.c (time_cmp): get rid of infinite
  recursion.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@39292 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2013-02-17 11:55:50 +00:00

79 lines
1.7 KiB
Ruby

require 'test/unit'
class TestComparable < Test::Unit::TestCase
def setup
@o = Object.new
@o.extend(Comparable)
end
def cmp(b)
class << @o; self; end.class_eval {
undef :<=>
define_method(:<=>, b)
}
end
def test_equal
cmp->(x) do 0; end
assert_equal(true, @o == nil)
cmp->(x) do 1; end
assert_equal(false, @o == nil)
cmp->(x) do raise; end
assert_equal(false, @o == nil)
end
def test_gt
cmp->(x) do 1; end
assert_equal(true, @o > nil)
cmp->(x) do 0; end
assert_equal(false, @o > nil)
cmp->(x) do -1; end
assert_equal(false, @o > nil)
end
def test_ge
cmp->(x) do 1; end
assert_equal(true, @o >= nil)
cmp->(x) do 0; end
assert_equal(true, @o >= nil)
cmp->(x) do -1; end
assert_equal(false, @o >= nil)
end
def test_lt
cmp->(x) do 1; end
assert_equal(false, @o < nil)
cmp->(x) do 0; end
assert_equal(false, @o < nil)
cmp->(x) do -1; end
assert_equal(true, @o < nil)
end
def test_le
cmp->(x) do 1; end
assert_equal(false, @o <= nil)
cmp->(x) do 0; end
assert_equal(true, @o <= nil)
cmp->(x) do -1; end
assert_equal(true, @o <= nil)
end
def test_between
cmp->(x) do 0 <=> x end
assert_equal(false, @o.between?(1, 2))
assert_equal(false, @o.between?(-2, -1))
assert_equal(true, @o.between?(-1, 1))
assert_equal(true, @o.between?(0, 0))
end
def test_err
assert_raise(ArgumentError) { 1.0 < nil }
assert_raise(ArgumentError) { 1.0 < Object.new }
end
def test_inversed_compare
bug7870 = '[ruby-core:52305] [Bug #7870]'
assert_nothing_raised(SystemStackError, bug7870) {
assert_nil(Time.new <=> "")
}
end
end