Pass 0L for mpz_scan1. mpz_mmod => mpz_mod.

1 files changed, 2 insertions, 2 deletions

diff --git a/mpz/pprime_p.c b/mpz/pprime_p.c
index 0a075bd5f..d94a7bd86 100644
--- a/mpz/pprime_p.c
+++ b/mpz/pprime_p.c
@@ -143,7 +143,7 @@ mpz_probab_prime_p (m, reps)
   mpz_init (q);
 
   /* Find q and k, where q is odd and n = 1 + 2**k * q.  */
-  k = mpz_scan1 (n_minus_1, 0);
+  k = mpz_scan1 (n_minus_1, 0L);
   mpz_tdiv_q_2exp (q, n_minus_1, k);
 
   is_prime = 1;
@@ -192,7 +192,7 @@ millerrabin (n, n_minus_1, x, y, q, k)
   do
     {
       mpz_random (x, mpz_size (n));
-      mpz_mmod (x, x, n);
+      mpz_mod (x, x, n);
     }
   while (mpz_cmp_ui (x, 1L) <= 0);