X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/fe6657c961b01ec72e9f35f4c3d96b11b31cf09c..45c0fd363937c6e9b05da04a9167e9912c05ca0c:/utils/prim.c diff --git a/utils/prim.c b/utils/prim.c index 39b7e6f..a83288a 100644 --- a/utils/prim.c +++ b/utils/prim.c @@ -30,8 +30,8 @@ static int primitivep(fact_v *f, mp *p) for (i = 0; i < DA_LEN(f); i++) { x = gfreduce_exp(&r, x, MP_TWO, DA(f)[i].r); #ifdef DEBUG - MP_PRINT(" r", DA(f)[i].r); - MP_PRINTX(" x", x); + MP_PRINT(" r", DA(f)[i].r); + MP_PRINTX(" x", x); #endif if (MP_EQ(x, MP_ONE)) { rc = 0; @@ -65,7 +65,7 @@ static mp *fip(fact_v *f, unsigned m) n = 0; while (!dofip(f, m, &p, n, m)) n += 2; - return (p); + return (p); } static void findprim(unsigned m)