X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/9312c71ff376dd96fdf970002fd3adb5aeec8db3..22bab86c9df047bdd258283c6567821319ba7a6f:/rsa-priv.c

diff --git a/rsa-priv.c b/rsa-priv.c
index 65c4b00..255a6b5 100644
--- a/rsa-priv.c
+++ b/rsa-priv.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: rsa-priv.c,v 1.1 2000/07/01 11:23:20 mdw Exp $
+ * $Id: rsa-priv.c,v 1.2 2000/10/08 12:11:22 mdw Exp $
  *
  * RSA private-key operations
  *
@@ -30,6 +30,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: rsa-priv.c,v $
+ * Revision 1.2  2000/10/08 12:11:22  mdw
+ * Use @MP_EQ@ instead of @MP_CMP@.
+ *
  * Revision 1.1  2000/07/01 11:23:20  mdw
  * Renamed from `rsa-decrypt', since the name was no longer appropriate.
  * Add functions for doing padded RSA decryption and signing.
@@ -137,7 +140,7 @@ mp *rsa_privop(rsa_privctx *rd, mp *d, mp *c)
     do {
       k = mprand_range(k, rp->n, rd->r, 0);
       mp_gcd(&g, 0, &ki, rp->n, k);
-    } while (MP_CMP(g, !=, MP_ONE));
+    } while (!MP_EQ(g, MP_ONE));
     k = mpmont_expr(&rd->nm, k, k, rp->e);
     c = mpmont_mul(&rd->nm, c, c, k);
     mp_drop(k);
@@ -244,7 +247,7 @@ int rsa_sign(rsa_privctx *rp, const void *m, size_t sz,
   /* --- Sort out some space --- */
 
   dstr_ensure(d, n);
-  p = d->buf + d->len;
+  p = (octet *)d->buf + d->len;
   p[0] = 0;
 
   /* --- Do the packing --- */