/* -*-c-*-
*
- * $Id: mpmont-mexp.c,v 1.9 2004/04/08 01:36:15 mdw Exp $
+ * $Id$
*
* Multiple simultaneous exponentiations
*
mp *t;
if (f[i].exp->f & MP_BURN)
spare = MP_NEWSEC;
- if (f[i].exp->f & MP_NEG) {
+ if (MP_NEGP(f[i].exp)) {
t = mpmont_reduce(mm, f[i].base, f[i].base);
t = mp_modinv(t, t, mm->m);
f[i].base = mpmont_mul(mm, t, t, mm->r2);