summaryrefslogtreecommitdiff
path: root/test/ruby/test_bignum.rb
diff options
context:
space:
mode:
authornobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-09-05 15:15:43 +0000
committernobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2003-09-05 15:15:43 +0000
commit44785befeabd09d5d34f33b33783c0ec54f06a1f (patch)
tree56830470411bdaf525d1f4c489b120125efb9097 /test/ruby/test_bignum.rb
parent01e3a55648559ba3d54cdf72d5c55f71a41e69e9 (diff)
* lib/optparse.rb (OptionParser#order, #permute, #parse): allow an
array as argument. * test/ruby/test_*.rb: moved invariants to left side in assert_equal, and use assert_nil, assert_raises and so on. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4516 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'test/ruby/test_bignum.rb')
-rw-r--r--test/ruby/test_bignum.rb53
1 files changed, 21 insertions, 32 deletions
diff --git a/test/ruby/test_bignum.rb b/test/ruby/test_bignum.rb
index 78e3a38279..0ba2397c54 100644
--- a/test/ruby/test_bignum.rb
+++ b/test/ruby/test_bignum.rb
@@ -19,47 +19,36 @@ class TestBignum < Test::Unit::TestCase
assert_equal($x, fact(40))
assert($x < $x+2)
assert($x > $x-2)
- assert_equal($x, 815915283247897734345611269596115894272000000000)
- assert_not_equal($x, 815915283247897734345611269596115894272000000001)
- assert_equal($x+1, 815915283247897734345611269596115894272000000001)
- assert_equal($x/fact(20), 335367096786357081410764800000)
+ assert_equal(815915283247897734345611269596115894272000000000, $x)
+ assert_not_equal(815915283247897734345611269596115894272000000001, $x)
+ assert_equal(815915283247897734345611269596115894272000000001, $x+1)
+ assert_equal(335367096786357081410764800000, $x/fact(20))
$x = -$x
- assert_equal($x, -815915283247897734345611269596115894272000000000)
+ assert_equal(-815915283247897734345611269596115894272000000000, $x)
assert_equal(2-(2**32), -(2**32-2))
assert_equal(2**32 - 5, (2**32-3)-2)
- $good = true;
for i in 1000..1014
- $good = false if ((1<<i) != (2**i))
+ assert_equal(2 ** i, 1 << i)
end
- assert($good)
-
- $good = true;
- n1=1<<1000
+
+ n1 = 1 << 1000
for i in 1000..1014
- $good = false if ((1<<i) != n1)
+ assert_equal(n1, 1 << i)
n1 *= 2
end
- assert($good)
-
- $good = true;
+
n2=n1
for i in 1..10
n1 = n1 / 2
n2 = n2 >> 1
- $good = false if (n1 != n2)
+ assert_equal(n1, n2)
end
- assert($good)
-
- $good = true;
+
for i in 4000..4096
n1 = 1 << i;
- if (n1**2-1) / (n1+1) != (n1-1)
- p i
- $good = false
- end
+ assert_equal(n1-1, (n1**2-1) / (n1+1))
end
- assert($good)
end
def test_calc
@@ -73,14 +62,14 @@ class TestBignum < Test::Unit::TestCase
assert_equal(7, a.remainder(-b))
assert_equal(-7, (-a).remainder(b))
assert_equal(-7, (-a).remainder(-b))
-
- assert_equal(10**40+10**20, 10000000000000000000100000000000000000000)
- assert_equal(10**40/10**20, 100000000000000000000)
-
+
+ assert_equal(10000000000000000000100000000000000000000, 10**40+10**20)
+ assert_equal(100000000000000000000, 10**40/10**20)
+
a = 677330545177305025495135714080
b = 14269972710765292560
- assert_equal(a % b, 0)
- assert_equal(-a % b, 0)
+ assert_equal(0, a % b)
+ assert_equal(0, -a % b)
end
def test_shift
@@ -88,12 +77,12 @@ class TestBignum < Test::Unit::TestCase
b = a / (2 ** 32)
c = a >> 32
assert_equal(b, c)
-
+
b = a * (2 ** 32)
c = a << 32
assert_equal(b, c)
end
-
+
shift_test(-4518325415524767873)
shift_test(-0xfffffffffffffffff)
end