diff options
| author | mame <mame@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-09-04 14:47:40 +0000 |
|---|---|---|
| committer | mame <mame@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2008-09-04 14:47:40 +0000 |
| commit | a8f153c3a24fc1966e32ec7b511269800558636d (patch) | |
| tree | bc9b22cdb413a128d66fb4289adfb3a352d9e103 /ext | |
| parent | 8eada2f83661254768573e08ea1c5665b936899c (diff) | |
| download | ruby-a8f153c3a24fc1966e32ec7b511269800558636d.tar.gz ruby-a8f153c3a24fc1966e32ec7b511269800558636d.tar.xz ruby-a8f153c3a24fc1966e32ec7b511269800558636d.zip | |
* ext/bigdecimal/bigdecimal.c (BigDecimal_mode): set exception mode
correctly. In spite of BigDecimal.mode(BigDecimal::EXCEPTION_ALL,
true), BigDecimal.new("NaN") did not raise an exception previously.
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@19138 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/bigdecimal/bigdecimal.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c index e8da7cc41..754c31999 100644 --- a/ext/bigdecimal/bigdecimal.c +++ b/ext/bigdecimal/bigdecimal.c @@ -412,11 +412,17 @@ BigDecimal_mode(int argc, VALUE *argv, VALUE self) VpSetException((unsigned short)((val==Qtrue)?(fo|VP_EXCEPTION_INFINITY): (fo&(~VP_EXCEPTION_INFINITY)))); } + fo = VpGetException(); if(f&VP_EXCEPTION_NaN) { VpSetException((unsigned short)((val==Qtrue)?(fo|VP_EXCEPTION_NaN): (fo&(~VP_EXCEPTION_NaN)))); } fo = VpGetException(); + if(f&VP_EXCEPTION_UNDERFLOW) { + VpSetException((unsigned short)((val==Qtrue)?(fo|VP_EXCEPTION_UNDERFLOW): + (fo&(~VP_EXCEPTION_UNDERFLOW)))); + } + fo = VpGetException(); return INT2FIX(fo); } if(VP_ROUND_MODE==f) { |