diff options
| author | Marco Bodrato <bodrato@mail.dm.unipi.it> | 2018-12-15 08:07:13 +0100 |
|---|---|---|
| committer | Marco Bodrato <bodrato@mail.dm.unipi.it> | 2018-12-15 08:07:13 +0100 |
| commit | daebd85b7c322efc7adbd1755a6695441c9c34c9 (patch) | |
| tree | c350f6b59919642c75dfc524ae2282192e16ba62 /mini-gmp/mini-gmp.c | |
| parent | 26b22f58cd5a54e867d41eb1b5eef41c629a257a (diff) | |
| download | gmp-daebd85b7c322efc7adbd1755a6695441c9c34c9.tar.gz | |
mini-gmp/mini-gmp.c (gmp_stronglucas): add a cast.
(mpz_com): invert order of operations.
Diffstat (limited to 'mini-gmp/mini-gmp.c')
| -rw-r--r-- | mini-gmp/mini-gmp.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mini-gmp/mini-gmp.c b/mini-gmp/mini-gmp.c index 400336901..0a625b8dc 100644 --- a/mini-gmp/mini-gmp.c +++ b/mini-gmp/mini-gmp.c @@ -3581,7 +3581,7 @@ gmp_stronglucas (const mpz_t x, mpz_t Qk) b0 = mpz_scan0 (n, 0); /* D= P^2 - 4Q; P = 1; Q = (1-D)/4 */ - Q = (D & 2) ? (D >> 2) + 1 : -(D >> 2); + Q = (D & 2) ? (D >> 2) + 1 : -(long) (D >> 2); if (! mpz_lucas_mod (V, Qk, Q, b0, n)) /* If Ud != 0 */ while (V->_mp_size != 0 && --b0 != 0) /* while Vk != 0 */ @@ -3848,8 +3848,8 @@ mpz_combit (mpz_t d, mp_bitcnt_t bit_index) void mpz_com (mpz_t r, const mpz_t u) { - mpz_neg (r, u); - mpz_sub_ui (r, r, 1); + mpz_add_ui (r, u, 1); + mpz_neg (r, r); } void |