- case PGEN_TRY: {
- mp *a = mprand_range(MP_NEW, ev->m, ev->r, 0);
- rc = rabin_test(r, a);
- mp_drop(a);
- } break;
+ case PGEN_TRY:
+ if (!ev->tests)
+ rc = rabin_rtest(r, MP_TWO);
+ else {
+ mp *a = mprand_range(MP_NEW, ev->m, ev->r, 0);
+ rc = rabin_rtest(r, a);
+ mp_drop(a);
+ }
+ break;