From 31b6ea65bb9aa9b5ef16ff0a9ca021f66a207300 Mon Sep 17 00:00:00 2001 From: matz Date: Fri, 5 Sep 2008 18:24:21 +0000 Subject: * include/ruby/ruby.h (DBL2NUM): renamed from DOUBLE2NUM. a patch from Tadashi Saito in [ruby-dev:36102]. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@19160 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- bignum.c | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'bignum.c') diff --git a/bignum.c b/bignum.c index 2c606f8753..6ebbfa0b70 100644 --- a/bignum.c +++ b/bignum.c @@ -1237,7 +1237,7 @@ rb_big2dbl(VALUE x) static VALUE rb_big_to_f(VALUE x) { - return DOUBLE2NUM(rb_big2dbl(x)); + return DBL2NUM(rb_big2dbl(x)); } /* @@ -1499,7 +1499,7 @@ rb_big_plus(VALUE x, VALUE y) return bignorm(bigadd(x, y, 1)); case T_FLOAT: - return DOUBLE2NUM(rb_big2dbl(x) + RFLOAT_VALUE(y)); + return DBL2NUM(rb_big2dbl(x) + RFLOAT_VALUE(y)); default: return rb_num_coerce_bin(x, y, '+'); @@ -1524,7 +1524,7 @@ rb_big_minus(VALUE x, VALUE y) return bignorm(bigadd(x, y, 0)); case T_FLOAT: - return DOUBLE2NUM(rb_big2dbl(x) - RFLOAT_VALUE(y)); + return DBL2NUM(rb_big2dbl(x) - RFLOAT_VALUE(y)); default: return rb_num_coerce_bin(x, y, '-'); @@ -1588,7 +1588,7 @@ rb_big_mul0(VALUE x, VALUE y) break; case T_FLOAT: - return DOUBLE2NUM(rb_big2dbl(x) * RFLOAT_VALUE(y)); + return DBL2NUM(rb_big2dbl(x) * RFLOAT_VALUE(y)); default: return rb_num_coerce_bin(x, y, '*'); @@ -1817,7 +1817,7 @@ rb_big_divide(VALUE x, VALUE y, ID op) { double div = rb_big2dbl(x) / RFLOAT_VALUE(y); if (op == '/') { - return DOUBLE2NUM(div); + return DBL2NUM(div); } else { return rb_dbl2big(div); @@ -2010,7 +2010,7 @@ rb_big_fdiv(VALUE x, VALUE y) if (ey) y = big_shift(y, ey); bignum: bigdivrem(x, y, &z, 0); - return DOUBLE2NUM(ldexp(big2dbl(z), ex - ey)); + return DBL2NUM(ldexp(big2dbl(z), ex - ey)); } case T_FLOAT: if (isnan(RFLOAT_VALUE(y))) return y; @@ -2035,7 +2035,7 @@ rb_big_fdiv(VALUE x, VALUE y) default: return rb_num_coerce_bin(x, y, rb_intern("fdiv")); } - return DOUBLE2NUM(dx / dy); + return DBL2NUM(dx / dy); } static VALUE @@ -2148,7 +2148,7 @@ rb_big_pow(VALUE x, VALUE y) default: return rb_num_coerce_bin(x, y, rb_intern("**")); } - return DOUBLE2NUM(pow(rb_big2dbl(x), d)); + return DBL2NUM(pow(rb_big2dbl(x), d)); } static VALUE -- cgit v1.2.3