kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

refined.

Browse source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12793 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
akr 2007-07-15 01:20:56 +00:00
parent 1edeb9a6d1
commit 3c883bdd17
1 changed files with 12 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
test/ruby/test_integer.rb
View file

@ -83,6 +83,8 @@ class TestInteger < Test::Unit::TestCase
0x10000000000000001, 0x10000000000000001,
] ]
#VS.map! {|v| 0x40000000.coerce(v)[0] }
def test_aref def test_aref
VS.each {|a| VS.each {|a|
100.times {|i| 100.times {|i|
@ -97,7 +99,6 @@ class TestInteger < Test::Unit::TestCase
c = a + b c = a + b
assert_equal(b + a, c, "#{a} + #{b}") assert_equal(b + a, c, "#{a} + #{b}")
assert_equal(a, c - b, "(#{a} + #{b}) - #{b}") assert_equal(a, c - b, "(#{a} + #{b}) - #{b}")
assert_equal(b, c - a, "(#{a} + #{b}) - #{a}")
assert_equal(a-~b-1, c, "#{a} + #{b}") # Hacker's Delight assert_equal(a-~b-1, c, "#{a} + #{b}") # Hacker's Delight
assert_equal((a^b)+2*(a&b), c, "#{a} + #{b}") # Hacker's Delight assert_equal((a^b)+2*(a&b), c, "#{a} + #{b}") # Hacker's Delight
assert_equal((a|b)+(a&b), c, "#{a} + #{b}") # Hacker's Delight assert_equal((a|b)+(a&b), c, "#{a} + #{b}") # Hacker's Delight
@ -125,7 +126,6 @@ class TestInteger < Test::Unit::TestCase
VS.each {|b| VS.each {|b|
c = a * b c = a * b
assert_equal(b * a, c, "#{a} * #{b}") assert_equal(b * a, c, "#{a} * #{b}")
assert_equal(a, c / b, "(#{a} * #{b}) / #{b}") if b != 0
assert_equal(b, c / a, "(#{a} * #{b}) / #{a}") if a != 0 assert_equal(b, c / a, "(#{a} * #{b}) / #{a}") if a != 0
assert_equal(a.abs * b.abs, (a * b).abs, "(#{a} * #{b}).abs") assert_equal(a.abs * b.abs, (a * b).abs, "(#{a} * #{b}).abs")
assert_equal((a-100)*(b-100)+(a-100)*100+(b-100)*100+10000, c, "#{a} * #{b}") assert_equal((a-100)*(b-100)+(a-100)*100+(b-100)*100+10000, c, "#{a} * #{b}")
@ -158,6 +158,11 @@ class TestInteger < Test::Unit::TestCase
d = 1 d = 1
b.times { d *= a } b.times { d *= a }
assert_equal(d, c, "(#{a}) ** #{b}") assert_equal(d, c, "(#{a}) ** #{b}")
if a != 0
d = c
b.times { d /= a }
assert_equal(1, d, "((#{a}) ** #{b}) ** (-#{b})")
end
} }
} }
end end
@ -180,7 +185,6 @@ class TestInteger < Test::Unit::TestCase
assert_equal(a + b - (a&b), c, "#{a} | #{b}") assert_equal(a + b - (a&b), c, "#{a} | #{b}")
assert_equal((a & ~b) + b, c, "#{a} | #{b}") # Hacker's Delight assert_equal((a & ~b) + b, c, "#{a} | #{b}") # Hacker's Delight
assert_equal(-1, c | ~a, "(#{a} | #{b}) | ~#{a})") assert_equal(-1, c | ~a, "(#{a} | #{b}) | ~#{a})")
assert_equal(-1, c | ~b, "(#{a} | #{b}) | ~#{b})")
} }
} }
end end
@ -193,7 +197,6 @@ class TestInteger < Test::Unit::TestCase
assert_equal(a + b - (a|b), c, "#{a} & #{b}") assert_equal(a + b - (a|b), c, "#{a} & #{b}")
assert_equal((~a | b) - ~a, c, "#{a} & #{b}") # Hacker's Delight assert_equal((~a | b) - ~a, c, "#{a} & #{b}") # Hacker's Delight
assert_equal(0, c & ~a, "(#{a} & #{b}) & ~#{a}") assert_equal(0, c & ~a, "(#{a} & #{b}) & ~#{a}")
assert_equal(0, c & ~b, "(#{a} & #{b}) & ~#{b}")
} }
} }
end end
@ -205,7 +208,6 @@ class TestInteger < Test::Unit::TestCase
assert_equal(b ^ a, c, "#{a} ^ #{b}") assert_equal(b ^ a, c, "#{a} ^ #{b}")
assert_equal((a|b)-(a&b), c, "#{a} ^ #{b}") # Hacker's Delight assert_equal((a|b)-(a&b), c, "#{a} ^ #{b}") # Hacker's Delight
assert_equal(b, c ^ a, "(#{a} ^ #{b}) ^ #{a}") assert_equal(b, c ^ a, "(#{a} ^ #{b}) ^ #{a}")
assert_equal(a, c ^ b, "(#{a} ^ #{b}) ^ #{b}")
} }
} }
end end
@ -245,6 +247,7 @@ class TestInteger < Test::Unit::TestCase
b = a.succ b = a.succ
assert_equal(a+1, b, "(#{a}).succ") assert_equal(a+1, b, "(#{a}).succ")
assert_equal(a, b.pred, "(#{a}).succ.pred") assert_equal(a, b.pred, "(#{a}).succ.pred")
assert_equal(a, b-1, "(#{a}).succ - 1")
} }
end end
@ -253,6 +256,7 @@ class TestInteger < Test::Unit::TestCase
b = a.pred b = a.pred
assert_equal(a-1, b, "(#{a}).pred") assert_equal(a-1, b, "(#{a}).pred")
assert_equal(a, b.succ, "(#{a}).pred.succ") assert_equal(a, b.succ, "(#{a}).pred.succ")
assert_equal(a, b + 1, "(#{a}).pred + 1")
} }
end end
@ -267,6 +271,8 @@ class TestInteger < Test::Unit::TestCase
VS.each {|a| VS.each {|a|
b = -a b = -a
assert_equal(0-a, b, "-(#{a})") assert_equal(0-a, b, "-(#{a})")
assert_equal(~a+1, b, "-(#{a})")
assert_equal(0, a+b, "#{a}+(-(#{a}))")
} }
end end
@ -286,6 +292,7 @@ class TestInteger < Test::Unit::TestCase
VS.each_with_index {|a, i| VS.each_with_index {|a, i|
VS.each_with_index {|b, j| VS.each_with_index {|b, j|
c = a == b c = a == b
assert_equal(b == a, c, "#{a} == #{b}")
assert_equal(i == j, c, "#{a} == #{b}") assert_equal(i == j, c, "#{a} == #{b}")
} }
} }