From af8cae1e7fe0a5ee0b9404aaf8ed7c9888272d09 Mon Sep 17 00:00:00 2001 From: mrkn Date: Mon, 23 Aug 2010 16:22:04 +0000 Subject: * ext/bigdecimal/bigdecimal.c (BigDecimal_to_f): to_f must underflow when the exponent is less than DBL_MIN_10_EXP - BASE_FIG. * test/bigdecimal/test_bigdecimal.rb (test_to_f): added test for the above changes. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@29078 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- test/bigdecimal/test_bigdecimal.rb | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'test/bigdecimal/test_bigdecimal.rb') diff --git a/test/bigdecimal/test_bigdecimal.rb b/test/bigdecimal/test_bigdecimal.rb index 467b5e1b0b..53979340a1 100644 --- a/test/bigdecimal/test_bigdecimal.rb +++ b/test/bigdecimal/test_bigdecimal.rb @@ -343,6 +343,16 @@ class TestBigDecimal < Test::Unit::TestCase BigDecimal.mode(BigDecimal::EXCEPTION_OVERFLOW, false) assert_kind_of(Float, x .to_f) assert_kind_of(Float, (-x).to_f) + + BigDecimal.mode(BigDecimal::EXCEPTION_UNDERFLOW, true) + assert_raise(FloatDomainError) { + BigDecimal("1e#{Float::MIN_10_EXP - 2*Float::DIG}").to_f } + assert_raise(FloatDomainError) { + BigDecimal("-1e#{Float::MIN_10_EXP - 2*Float::DIG}").to_f } + + BigDecimal.mode(BigDecimal::EXCEPTION_UNDERFLOW, false) + assert_equal( 0.0, BigDecimal("1e#{Float::MIN_10_EXP - 2*Float::DIG}").to_f) + assert_equal(-0.0, BigDecimal("-1e#{Float::MIN_10_EXP - 2*Float::DIG}").to_f) end def test_coerce -- cgit v1.2.3