simplify

Submitted by: Nils Larsch

diff --git a/crypto/ec/ecp_nist.c b/crypto/ec/ecp_nist.c
index 559cb5c4188b5f7d9ba3fe44060a81fb15c2198a..ba5d180e1d01c71e7c60756784e83494827577d5 100644 (file)
--- a/crypto/ec/ecp_nist.c
+++ b/crypto/ec/ecp_nist.c
@@ -3,7 +3,7 @@
  * Written by Nils Larsch for the OpenSSL project.
  */
 /* ====================================================================
- * Copyright (c) 1998-2002 The OpenSSL Project.  All rights reserved.
+ * Copyright (c) 1998-2003 The OpenSSL Project.  All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
@@ -165,21 +165,7 @@ int ec_GFp_nist_group_set_curve(EC_GROUP *group, const BIGNUM *p,
                goto err;
                }
 
-       /* group->field */
-       if (!BN_copy(&group->field, p)) goto err;
-       BN_set_sign(&group->field, 0);
-
-       /* group->a */
-       if (!group->field_mod_func(&group->a, a, p, ctx)) goto err;
-
-       /* group->b */
-       if (!group->field_mod_func(&group->b, b, p, ctx)) goto err;
-
-       /* group->a_is_minus3 */
-       if (!BN_add_word(tmp_bn, 3)) goto err;
-       group->a_is_minus3 = (0 == BN_cmp(tmp_bn, &group->field));
-
-       ret = 1;
+       ret = ec_GFp_simple_group_set_curve(group, p, a, b, ctx);
 
  err:
        BN_CTX_end(ctx);