kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

bary_mul_balance_with_mulfunc: consitify invariant variables

Browse source
This commit is contained in:
Nobuyoshi Nakada 2021-10-11 13:28:17 +09:00
parent fdf5798fa1
commit 6fa1af7ee5
Notes: git 2021-10-12 00:45:34 +09:00 
Merged: https://github.com/ruby/ruby/pull/4949
1 changed files with 11 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
bignum.c
View file

@ -1641,11 +1641,13 @@ rb_big_sq_fast(VALUE x)
/* balancing multiplication by slicing larger argument */
static void
bary_mul_balance_with_mulfunc(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t xn, const BDIGIT *yds, size_t yn, BDIGIT *wds, size_t wn, mulfunc_t *mulfunc)
bary_mul_balance_with_mulfunc(BDIGIT *const zds, const size_t zn,
const BDIGIT *const xds, const size_t xn,
const BDIGIT *const yds, const size_t yn,
BDIGIT *wds, size_t wn, mulfunc_t *const mulfunc)
{
VALUE work = 0;
size_t yn0 = yn;
size_t r, n;
size_t n;
assert(xn + yn <= zn);
assert(xn <= yn);
@ -1654,13 +1656,11 @@ bary_mul_balance_with_mulfunc(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t
BDIGITS_ZERO(zds, xn);
n = 0;
while (yn > 0) {
BDIGIT *tds;
size_t tn;
r = xn > yn ? yn : xn;
tn = xn + r;
while (yn > n) {
const size_t r = (xn > (yn - n) ? (yn - n) : xn);
const size_t tn = (xn + r);
if (2 * (xn + r) <= zn - n) {
tds = zds + n + xn + r;
BDIGIT *const tds = zds + n + xn + r;
mulfunc(tds, tn, xds, xn, yds + n, r, wds, wn);
BDIGITS_ZERO(zds + n + xn, r);
bary_add(zds + n, tn,
@ -1668,21 +1668,20 @@ bary_mul_balance_with_mulfunc(BDIGIT *zds, size_t zn, const BDIGIT *xds, size_t
tds, tn);
}
else {
BDIGIT *const tds = zds + n;
if (wn < xn) {
wn = xn;
wds = ALLOCV_N(BDIGIT, work, wn);
}
tds = zds + n;
MEMCPY(wds, zds + n, BDIGIT, xn);
mulfunc(tds, tn, xds, xn, yds + n, r, wds+xn, wn-xn);
bary_add(zds + n, tn,
zds + n, tn,
wds, xn);
}
yn -= r;
n += r;
}
BDIGITS_ZERO(zds+xn+yn0, zn - (xn+yn0));
BDIGITS_ZERO(zds+xn+yn, zn - (xn+yn));
if (work)
ALLOCV_END(work);