BN_mod_sqrt documentation/comment
[openssl.git] / crypto / bn / bn_sqrt.c
index a54d9d29195a5c9c693b9b2c621cfca87b85f7ca..6d50b5d895bc56e09ecaddd613f83f7f2c24a100 100644 (file)
@@ -201,7 +201,7 @@ BIGNUM *BN_mod_sqrt(BIGNUM *in, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx)
 
                /* t := (2*a)*b^2 - 1*/
                if (!BN_mod_mul(t, t, y, p, ctx)) goto end;
 
                /* t := (2*a)*b^2 - 1*/
                if (!BN_mod_mul(t, t, y, p, ctx)) goto end;
-               if (!BN_sub_word(t, 1)) goto end; /* cannot become negative */
+               if (!BN_sub_word(t, 1)) goto end;
 
                /* x = a*b*t */
                if (!BN_mod_mul(x, a, b, p, ctx)) goto end;
 
                /* x = a*b*t */
                if (!BN_mod_mul(x, a, b, p, ctx)) goto end;