1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

rational.c: optimize rational * {float, huge rational, bignum}

Browse Source 
* rational.c (f_muldiv, nurat_mul):
  optimize rational * {float, huge rational, bignum}.
  Author: Tadashi Saito <tad.a.digger@gmail.com>

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@56712 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
mrkn 2016-11-11 15:11:04 +00:00
parent 86ec117881
commit 8fd00809a7
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rational.c
View File

@ -837,8 +837,8 @@ f_muldiv(VALUE self, VALUE anum, VALUE aden, VALUE bnum, VALUE bden, int k)
VALUE g1 = f_gcd(anum, bden); VALUE g1 = f_gcd(anum, bden);
VALUE g2 = f_gcd(aden, bnum); VALUE g2 = f_gcd(aden, bnum);
num = f_mul(f_idiv(anum, g1), f_idiv(bnum, g2)); num = rb_int_mul(rb_int_idiv(anum, g1), rb_int_idiv(bnum, g2));
den = f_mul(f_idiv(aden, g2), f_idiv(bden, g1)); den = rb_int_mul(rb_int_idiv(aden, g2), rb_int_idiv(bden, g1));
} }
return f_rational_new_no_reduce2(CLASS_OF(self), num, den); return f_rational_new_no_reduce2(CLASS_OF(self), num, den);
} }
@ -867,8 +867,8 @@ nurat_mul(VALUE self, VALUE other)
other, ONE, '*'); other, ONE, '*');
} }
} }
else if (RB_TYPE_P(other, T_FLOAT)) { else if (RB_FLOAT_TYPE_P(other)) {
return f_mul(f_to_f(self), other); return DBL2NUM(RFLOAT_VALUE(nurat_to_f(self)) * RFLOAT_VALUE(other));
} }
else if (RB_TYPE_P(other, T_RATIONAL)) { else if (RB_TYPE_P(other, T_RATIONAL)) {
{ {