prime generation: Deploy the new Baillie--PSW testers.

[catacomb] / math / limlee.c

diff --git a/math/limlee.c b/math/limlee.c
index c99ba7b..55959cc 100644 (file)
--- a/math/limlee.c
+++ b/math/limlee.c
@@ -111,13 +111,12 @@ static int comb_next(octet *c, unsigned n, unsigned r)
 static void llgen(limlee_factor *f, unsigned pl, limlee_stepctx *l)
 {
   pgen_filterctx pf;
-  rabin r;
   mp *p;
 
   p = mprand(l->newp, pl, l->r, 1);
   pf.step = 2;
   p = pgen(l->u.s.name, p, p, l->iev, l->iec, 0, pgen_filter, &pf,
-          rabin_iters(pl), pgen_test, &r);
+          PGEN_BAILLIEPSWNTESTS, pgen_bailliepswtest, 0);
   f->p = p;
 }
 
@@ -402,7 +401,7 @@ mp *limlee(const char *name, mp *d, mp *newp,
   l.r = r;
 
   d = pgen(name, d, 0, oev, oec, on, limlee_step, &l,
-          rabin_iters(pl), pgen_test, &rr);
+          PGEN_BAILLIEPSWNTESTS, pgen_bailliepswtest, &rr);
 
   if (f) {
     if (!d) {