/* -*-c-*-
*
- * $Id: mpmont.c,v 1.12 2000/10/08 15:48:35 mdw Exp $
+ * $Id: mpmont.c,v 1.14 2001/02/22 09:04:26 mdw Exp $
*
* Montgomery reduction
*
/*----- Revision history --------------------------------------------------*
*
* $Log: mpmont.c,v $
+ * Revision 1.14 2001/02/22 09:04:26 mdw
+ * Cosmetic fix.
+ *
+ * Revision 1.13 2001/02/03 12:00:29 mdw
+ * Now @mp_drop@ checks its argument is non-NULL before attempting to free
+ * it. Note that the macro version @MP_DROP@ doesn't do this.
+ *
* Revision 1.12 2000/10/08 15:48:35 mdw
* Rename Karatsuba constants now that we have @gfx_kmul@ too.
*
*/
MP_RSTEP(&sc);
- while (!MP_RBIT(&sc)) {
+ while (!MP_RBIT(&sc))
MP_RSTEP(&sc);
- }
/* --- Now for the main work --- */
mp_drop(tab[i]);
xfree(tab);
exit:
- if (d != MP_NEW)
- mp_drop(d);
- if (spare)
- mp_drop(spare);
+ mp_drop(d);
+ mp_drop(spare);
return (x);
}