diff options
author | shigek <shigek@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-07-23 04:48:56 +0000 |
---|---|---|
committer | shigek <shigek@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2003-07-23 04:48:56 +0000 |
commit | 28f3cb3fd86c329666cdd86cbdf8b7d0d01ab9aa (patch) | |
tree | 13c8dbd9c3bda343b56b0ff7b1b7056efbf77572 /ext/bigdecimal/bigdecimal.c | |
parent | f802b755759ed2ef9403a173a10bccfe4854df29 (diff) |
COMP_MODE_ROUNDUP -> COMP_MODE_ROUND
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4121 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/bigdecimal/bigdecimal.c')
-rw-r--r-- | ext/bigdecimal/bigdecimal.c | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/ext/bigdecimal/bigdecimal.c b/ext/bigdecimal/bigdecimal.c index 62078b9e53..5259fed066 100644 --- a/ext/bigdecimal/bigdecimal.c +++ b/ext/bigdecimal/bigdecimal.c @@ -1402,7 +1402,7 @@ Init_bigdecimal(void) /* Computation mode */ rb_define_const(rb_cBigDecimal, "COMP_MODE",INT2FIX(VP_COMP_MODE)); rb_define_const(rb_cBigDecimal, "COMP_MODE_TRUNCATE",INT2FIX(VP_COMP_MODE_TRUNCATE)); - rb_define_const(rb_cBigDecimal, "COMP_MODE_ROUNDUP",INT2FIX(VP_COMP_MODE_ROUNDUP)); + rb_define_const(rb_cBigDecimal, "COMP_MODE_ROUND",INT2FIX(VP_COMP_MODE_ROUNDUP)); rb_define_const(rb_cBigDecimal, "COMP_MODE_CEIL",INT2FIX(VP_COMP_MODE_CEIL)); rb_define_const(rb_cBigDecimal, "COMP_MODE_FLOOR",INT2FIX(VP_COMP_MODE_FLOOR)); rb_define_const(rb_cBigDecimal, "COMP_MODE_EVEN",INT2FIX(VP_COMP_MODE_EVEN)); @@ -3912,8 +3912,15 @@ VpPower(Real *y, Real *x, S_INT n) Real *w2 = NULL; if(VpIsZero(x)) { - if(n<0) n = -n; - VpSetZero(y,(n%2)?VpGetSign(x):(-VpGetSign(x))); + sign = VpGetSign(x); + if(n<0) { + n = -n; + if(sign<0) sign = (n%2)?(-1):(1); + VpSetInf (y,sign); + } else { + if(sign<0) sign = (n%2)?(-1):(1); + VpSetZero(y,sign); + } goto Exit; } if(!VpIsDef(x)) { |