[libmath-prime-util-perl] 29/29: Minor updates for release
Partha P. Mukherjee
ppm-guest at moszumanska.debian.org
Thu May 21 18:48:18 UTC 2015
This is an automated email from the git hooks/post-receive script.
ppm-guest pushed a commit to annotated tag v0.27
in repository libmath-prime-util-perl.
commit 2ea2f7a2a234d3a79d4c6297de851d6a2f16bc54
Author: Dana Jacobsen <dana at acm.org>
Date: Mon May 20 02:45:48 2013 -0700
Minor updates for release
---
Changes | 2 +-
MANIFEST | 1 +
examples/verify-gmp-ecpp-cert.pl | 8 ++++++--
xt/primality-proofs.pl | 0
4 files changed, 8 insertions(+), 3 deletions(-)
diff --git a/Changes b/Changes
index 7438ece..2220c72 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,6 @@
Revision history for Perl extension Math::Prime::Util.
-0.27 xx May 2013
+0.27 20 May 2013
- is_prime, is_prob_prime, next_prime, and prev_prime now all go straight
to XS if possible. This makes them much faster for small inputs without
diff --git a/MANIFEST b/MANIFEST
index 298c91e..b2cb116 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -94,6 +94,7 @@ xt/moebius-mertens.pl
xt/totient-range.pl
xt/primality-small.pl
xt/primality-aks.pl
+xt/primality-proofs.pl
xt/small-is-next-prev.pl
xt/factor-holf.pl
xt/make-script-test-data.pl
diff --git a/examples/verify-gmp-ecpp-cert.pl b/examples/verify-gmp-ecpp-cert.pl
index 7c629ce..f816506 100755
--- a/examples/verify-gmp-ecpp-cert.pl
+++ b/examples/verify-gmp-ecpp-cert.pl
@@ -28,7 +28,11 @@ while (<>) {
if (/^N\[(\d+)\]\s*=\s*(\d+)/) {
$n = $2;
if ($1 == 0) {
- die "Bad input" if defined $N;
+ if (defined $N) {
+ # I guess we're done with the last one...
+ print verify_prime(@cert) ? "SUCCESS\n" : "FAILURE\n";
+ }
+ #die "Bad input" if defined $N;
$N = $n;
@cert = ($n, "AGKM");
}
@@ -56,7 +60,7 @@ while (<>) {
push @cert, [$n, $a, $b, $m, $q, [$Px,$Py]];
}
else {
- last if /^proven prime/;
+ undef $N if /^proven prime/;
}
}
diff --git a/xt/primality-proofs.pl b/xt/primality-proofs.pl
old mode 100644
new mode 100755
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git
More information about the Pkg-perl-cvs-commits
mailing list