diff options
| author | Kevin Ryde <user42@zip.com.au> | 2002-07-20 02:54:13 +0200 |
|---|---|---|
| committer | Kevin Ryde <user42@zip.com.au> | 2002-07-20 02:54:13 +0200 |
| commit | aa212881199705ff54e1bb7b38e2523e78e4b4af (patch) | |
| tree | a33c63954c979379751b130e8d36d2ced3068c1c /mpz/bin_ui.c | |
| parent | bfec4ce55cd0aeb0114416dc13122c5cdaecd918 (diff) | |
| download | gmp-aa212881199705ff54e1bb7b38e2523e78e4b4af.tar.gz | |
* mpz/bin_ui.c, mpz/jacobi.c, mpz/pprime_p.c, mpn/generic/divis.c:
More care with long and mp_size_t parameters, for the benefit of K&R.
Diffstat (limited to 'mpz/bin_ui.c')
| -rw-r--r-- | mpz/bin_ui.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mpz/bin_ui.c b/mpz/bin_ui.c index dc3e4c7bd..40e9e1579 100644 --- a/mpz/bin_ui.c +++ b/mpz/bin_ui.c @@ -88,7 +88,7 @@ mpz_bin_ui (mpz_ptr r, mpz_srcptr n, unsigned long int k) } kacc = 1; - mpz_init_set_ui (nacc, 1); + mpz_init_set_ui (nacc, 1L); for (i = 1; i <= k; i++) { @@ -107,7 +107,7 @@ mpz_bin_ui (mpz_ptr r, mpz_srcptr n, unsigned long int k) mpz_div_2exp (nacc, nacc, c); #endif - mpz_add_ui (ni, ni, 1); + mpz_add_ui (ni, ni, 1L); mpz_mul (nacc, nacc, ni); umul_ppmm (k1, k0, kacc, i << GMP_NAIL_BITS); k0 >>= GMP_NAIL_BITS; @@ -115,7 +115,7 @@ mpz_bin_ui (mpz_ptr r, mpz_srcptr n, unsigned long int k) { /* Accumulator overflow. Perform bignum step. */ mpz_mul (r, r, nacc); - mpz_set_ui (nacc, 1); + mpz_set_ui (nacc, 1L); DIVIDE (); kacc = i; } |