ruby-changes:48900
From: nobu <ko1@a...>
Date: Tue, 5 Dec 2017 09:10:06 +0900 (JST)
Subject: [ruby-changes:48900] nobu:r61018 (trunk): bignum.c: unified int_pow_tmp2
nobu 2017-12-05 09:09:58 +0900 (Tue, 05 Dec 2017) New Revision: 61018 https://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=revision&revision=61018 Log: bignum.c: unified int_pow_tmp2 * bignum.c (int_pow_tmp2): unified DLONG and none DLONG code. Modified files: trunk/bignum.c Index: bignum.c =================================================================== --- bignum.c (revision 61017) +++ bignum.c (revision 61018) @@ -6992,40 +6992,31 @@ int_pow_tmp2(VALUE x, VALUE y, long mm, https://github.com/ruby/ruby/blob/trunk/bignum.c#L6992 long tmp = 1L; long yy; #ifdef DLONG - DLONG const mmm = mm; + const DLONG m = mm; + long tmp2 = tmp; long xx = FIX2LONG(x); # define MUL_MODULO(a, b, c) (long)(((DLONG)(a) * (DLONG)(b)) % (c)) - - for (/*NOP*/; ! FIXNUM_P(y); y = rb_funcall(y, idGTGT, 1, LONG2FIX(1L))) { - if (RTEST(rb_int_odd_p(y))) { - tmp = MUL_MODULO(tmp, xx, mmm); - } - xx = MUL_MODULO(xx, xx, mmm); - } - for (yy = FIX2LONG(y); yy; yy >>= 1L) { - if (yy & 1L) { - tmp = MUL_MODULO(tmp, xx, mmm); - } - xx = MUL_MODULO(xx, xx, mmm); - } #else - VALUE const m = LONG2FIX(mm); + const VALUE m = LONG2FIX(mm); VALUE tmp2 = LONG2FIX(tmp); + VALUE xx = x; # define MUL_MODULO(a, b, c) rb_int_modulo(rb_fix_mul_fix((a), (b)), (c)) +#endif for (/*NOP*/; ! FIXNUM_P(y); y = rb_funcall(y, idGTGT, 1, LONG2FIX(1L))) { if (RTEST(rb_int_odd_p(y))) { - tmp2 = MUL_MODULO(tmp2, x, m); + tmp2 = MUL_MODULO(tmp2, xx, m); } - x = MUL_MODULO(x, x, m); + xx = MUL_MODULO(xx, xx, m); } for (yy = FIX2LONG(y); yy; yy >>= 1L) { if (yy & 1L) { - tmp2 = MUL_MODULO(tmp2, x, m); + tmp2 = MUL_MODULO(tmp2, xx, m); } - x = MUL_MODULO(x, x, m); + xx = MUL_MODULO(xx, xx, m); } +#ifndef DLONG tmp = FIX2LONG(tmp2); #endif if (nega_flg && tmp) { -- ML: ruby-changes@q... Info: http://www.atdot.net/~ko1/quickml/