factor: move prime_p local in

* src/factor.c (mp_prime_p): Refactor by moving local further in.

diff --git a/src/factor.c b/src/factor.c
index 766de2492599215cc6078bc568ec01fdb13fad13..a427f81c60c916c38f609728f4ada96d611c9144 100644 (file)
--- a/src/factor.c
+++ b/src/factor.c
@@ -1266,7 +1266,6 @@ mp_millerrabin (mpz_srcptr n, mpz_srcptr nm1, mpz_ptr x, mpz_ptr y,
 static bool ATTRIBUTE_PURE
 prime_p (mp_limb_t n)
 {
-  bool is_prime;
   mp_limb_t a_prim, one, ni;
   struct factors factors;
 
@@ -1300,6 +1299,8 @@ prime_p (mp_limb_t n)
      number composite.  */
   for (idx_t r = 0; r < PRIMES_PTAB_ENTRIES; r++)
     {
+      bool is_prime;
+
       if (flag_prove_primality)
         {
           is_prime = true;