summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authornobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2013-07-26 02:42:26 +0000
committernobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2013-07-26 02:42:26 +0000
commit8974d5aaa79f42b7366ecd99d74e29d3faf01ab8 (patch)
tree266e8685410055651ea0e3c43a4b95cfae702dfb /test
parent0f1265899513a96acd6119e204df3985f8887a1a (diff)
rational.c: ensure to be Rational
* rational.c (f_round_common): Rational is expected to be returned by Rational#*, but mathn.rb breaks that assumption. [ruby-core:56177] [Bug #8687] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42178 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'test')
-rw-r--r--test/test_mathn.rb102
1 files changed, 101 insertions, 1 deletions
diff --git a/test/test_mathn.rb b/test/test_mathn.rb
index 135f66f2617..e9a2c4c5bac 100644
--- a/test/test_mathn.rb
+++ b/test/test_mathn.rb
@@ -5,7 +5,7 @@ require_relative 'ruby/envutil'
class TestMathn < Test::Unit::TestCase
def test_power
assert_in_out_err ['-r', 'mathn', '-e', 'a=1**2;!a'], "", [], [], '[ruby-core:25740]'
- assert_in_out_err ['-r', 'mathn', '-e', 'a=(1<<126)**2;!a'], "", [], [], '[ruby-core:25740]'
+ assert_in_out_err ['-r', 'mathn', '-e', 'a=(1 << 126)**2;!a'], "", [], [], '[ruby-core:25740]'
assert_in_out_err ['-r', 'mathn/complex', '-e', 'a=Complex(0,1)**4;!a'], "", [], [], '[ruby-core:44170]'
assert_in_out_err ['-r', 'mathn/complex', '-e', 'a=Complex(0,1)**5;!a'], "", [], [], '[ruby-core:44170]'
end
@@ -15,4 +15,104 @@ class TestMathn < Test::Unit::TestCase
1.quo(2); puts :OK
EOS
end
+
+ def test_floor
+ assert_separately(%w[-rmathn], <<-EOS)
+ assert_equal( 2, ( 13/5).floor)
+ assert_equal( 2, ( 5/2).floor)
+ assert_equal( 2, ( 12/5).floor)
+ assert_equal(-3, (-12/5).floor)
+ assert_equal(-3, ( -5/2).floor)
+ assert_equal(-3, (-13/5).floor)
+
+ assert_equal( 2, ( 13/5).floor(0))
+ assert_equal( 2, ( 5/2).floor(0))
+ assert_equal( 2, ( 12/5).floor(0))
+ assert_equal(-3, (-12/5).floor(0))
+ assert_equal(-3, ( -5/2).floor(0))
+ assert_equal(-3, (-13/5).floor(0))
+
+ assert_equal(( 13/5), ( 13/5).floor(2))
+ assert_equal(( 5/2), ( 5/2).floor(2))
+ assert_equal(( 12/5), ( 12/5).floor(2))
+ assert_equal((-12/5), (-12/5).floor(2))
+ assert_equal(( -5/2), ( -5/2).floor(2))
+ assert_equal((-13/5), (-13/5).floor(2))
+ EOS
+ end
+
+ def test_ceil
+ assert_separately(%w[-rmathn], <<-EOS)
+ assert_equal( 3, ( 13/5).ceil)
+ assert_equal( 3, ( 5/2).ceil)
+ assert_equal( 3, ( 12/5).ceil)
+ assert_equal(-2, (-12/5).ceil)
+ assert_equal(-2, ( -5/2).ceil)
+ assert_equal(-2, (-13/5).ceil)
+
+ assert_equal( 3, ( 13/5).ceil(0))
+ assert_equal( 3, ( 5/2).ceil(0))
+ assert_equal( 3, ( 12/5).ceil(0))
+ assert_equal(-2, (-12/5).ceil(0))
+ assert_equal(-2, ( -5/2).ceil(0))
+ assert_equal(-2, (-13/5).ceil(0))
+
+ assert_equal(( 13/5), ( 13/5).ceil(2))
+ assert_equal(( 5/2), ( 5/2).ceil(2))
+ assert_equal(( 12/5), ( 12/5).ceil(2))
+ assert_equal((-12/5), (-12/5).ceil(2))
+ assert_equal(( -5/2), ( -5/2).ceil(2))
+ assert_equal((-13/5), (-13/5).ceil(2))
+ EOS
+ end
+
+ def test_truncate
+ assert_separately(%w[-rmathn], <<-EOS)
+ assert_equal( 2, ( 13/5).truncate)
+ assert_equal( 2, ( 5/2).truncate)
+ assert_equal( 2, ( 12/5).truncate)
+ assert_equal(-2, (-12/5).truncate)
+ assert_equal(-2, ( -5/2).truncate)
+ assert_equal(-2, (-13/5).truncate)
+
+ assert_equal( 2, ( 13/5).truncate(0))
+ assert_equal( 2, ( 5/2).truncate(0))
+ assert_equal( 2, ( 12/5).truncate(0))
+ assert_equal(-2, (-12/5).truncate(0))
+ assert_equal(-2, ( -5/2).truncate(0))
+ assert_equal(-2, (-13/5).truncate(0))
+
+ assert_equal(( 13/5), ( 13/5).truncate(2))
+ assert_equal(( 5/2), ( 5/2).truncate(2))
+ assert_equal(( 12/5), ( 12/5).truncate(2))
+ assert_equal((-12/5), (-12/5).truncate(2))
+ assert_equal(( -5/2), ( -5/2).truncate(2))
+ assert_equal((-13/5), (-13/5).truncate(2))
+ EOS
+ end
+
+ def test_round
+ assert_separately(%w[-rmathn], <<-EOS)
+ assert_equal( 3, ( 13/5).round)
+ assert_equal( 3, ( 5/2).round)
+ assert_equal( 2, ( 12/5).round)
+ assert_equal(-2, (-12/5).round)
+ assert_equal(-3, ( -5/2).round)
+ assert_equal(-3, (-13/5).round)
+
+ assert_equal( 3, ( 13/5).round(0))
+ assert_equal( 3, ( 5/2).round(0))
+ assert_equal( 2, ( 12/5).round(0))
+ assert_equal(-2, (-12/5).round(0))
+ assert_equal(-3, ( -5/2).round(0))
+ assert_equal(-3, (-13/5).round(0))
+
+ assert_equal(( 13/5), ( 13/5).round(2))
+ assert_equal(( 5/2), ( 5/2).round(2))
+ assert_equal(( 12/5), ( 12/5).round(2))
+ assert_equal((-12/5), (-12/5).round(2))
+ assert_equal(( -5/2), ( -5/2).round(2))
+ assert_equal((-13/5), (-13/5).round(2))
+ EOS
+ end
end