diff options
| author | tege <tege@gmplib.org> | 2002-04-30 03:40:06 +0200 |
|---|---|---|
| committer | tege <tege@gmplib.org> | 2002-04-30 03:40:06 +0200 |
| commit | a06ef87d6ae6bf56a1d9f3c1195ccedaa7b7c10c (patch) | |
| tree | 4c722db1965d33a901680fba6eba98d89f58a367 | |
| parent | 1f7d9de3d32a845bc6ba07c32ca3314938555c25 (diff) | |
| download | gmp-a06ef87d6ae6bf56a1d9f3c1195ccedaa7b7c10c.tar.gz | |
Additional nailify changes.
| -rw-r--r-- | mpn/generic/mod_1.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/mpn/generic/mod_1.c b/mpn/generic/mod_1.c index 5c316ee9e..17596cdd1 100644 --- a/mpn/generic/mod_1.c +++ b/mpn/generic/mod_1.c @@ -134,7 +134,7 @@ mpn_mod_1 (mp_srcptr up, mp_size_t un, mp_limb_t d) d <<= norm; n1 = up[un - 1] << GMP_NAIL_BITS; - r = (r << norm) | (n1 >> (BITS_PER_MP_LIMB - norm)); + r = (r << norm) | (n1 >> (GMP_LIMB_BITS - norm)); if (UDIV_NEEDS_NORMALIZATION && BELOW_THRESHOLD (un, MOD_1_UNNORM_THRESHOLD)) @@ -143,7 +143,8 @@ mpn_mod_1 (mp_srcptr up, mp_size_t un, mp_limb_t d) { n0 = up[i] << GMP_NAIL_BITS; udiv_qrnnd (dummy, r, r, - (n1 << norm) | (n0 >> (BITS_PER_MP_LIMB - norm)), d); + (n1 << norm) | (n0 >> (GMP_NUMB_BITS - norm)), + d); r >>= GMP_NAIL_BITS; n1 = n0; } @@ -160,7 +161,7 @@ mpn_mod_1 (mp_srcptr up, mp_size_t un, mp_limb_t d) { n0 = up[i] << GMP_NAIL_BITS; udiv_qrnnd_preinv (dummy, r, r, - (n1 << norm) | (n0 >> (BITS_PER_MP_LIMB - norm)), + (n1 << norm) | (n0 >> (GMP_NUMB_BITS - norm)), d, inv); r >>= GMP_NAIL_BITS; n1 = n0; |