Fix the LCM computation in the RSA multiprime key check

[openssl.git] / test / recipes / 15-test_mp_rsa.t

diff --git a/test/recipes/15-test_mp_rsa.t b/test/recipes/15-test_mp_rsa.t
index 2ab4e56f93510ea88aa1d69378f29ce11fb722d0..ffaf36cd52ffde902822b5b26a269748670be90d 100644 (file)
--- a/test/recipes/15-test_mp_rsa.t
+++ b/test/recipes/15-test_mp_rsa.t
@@ -35,10 +35,13 @@ my @test_param = (
     },
 );
 
-plan tests => 1 + scalar(@test_param) * 5 * 2;
+plan tests => 2 + scalar(@test_param) * 5 * 2;
 
 ok(run(test(["rsa_mp_test"])), "running rsa multi prime test");
 
+ok(run(app(['openssl', 'pkey', '-noout', '-check', '-in',
+            data_file('rsamplcm.pem')])), "checking lcm in key check");
+
 my $cleartext = data_file("plain_text");
 
 # genrsa