X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/b817bfc642225b8c3c0b6a7e42d1fb949b61a606..a69a3efddbe1261f55e90d4ff477053ab80663a5:/rsa-gen.c

diff --git a/rsa-gen.c b/rsa-gen.c
index 951ab9f..d284715 100644
--- a/rsa-gen.c
+++ b/rsa-gen.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: rsa-gen.c,v 1.5 2004/04/08 01:36:15 mdw Exp $
+ * $Id$
  *
  * RSA parameter generation
  *
@@ -122,7 +122,7 @@ again:
     goto again;
   }
 
-  if (phi->f & MP_NEG) {
+  if (MP_NEGP(phi)) {
     mp *z = rp->p;
     rp->p = rp->q;
     rp->q = z;