X-Git-Url: https://git.distorted.org.uk/~mdw/catacomb/blobdiff_plain/5f49478bd78e79bedb811e93f1f8feea83fc2979..30b7a66d4388a78e54da884bb4a880116064d730:/math/mp-nthrt.c?ds=sidebyside diff --git a/math/mp-nthrt.c b/math/mp-nthrt.c index a46590af..80185e0d 100644 --- a/math/mp-nthrt.c +++ b/math/mp-nthrt.c @@ -180,10 +180,9 @@ int mp_perfect_power_p(mp **x, mp **n, mp *a) t = mp_nthrt(t, a, p, &exactp); if (MP_EQ(t, MP_ONE)) break; - else if (!exactp) { - if (MP_EQ(t, MP_ONE)) break; + else if (!exactp) p = primeiter_next(&pi, p); - } else { + else { r = mp_mul(r, r, p); MP_DROP(a); a = t; t = MP_NEW; rc = 1;