This is an automated email from the git hooks/post-receive script. ppm-guest pushed a commit to annotated tag v0.40 in repository libmath-prime-util-perl.
commit b604e2c52e55a71aecdba4d545c6784fdfcca186 Author: Dana Jacobsen <d...@acm.org> Date: Mon Apr 21 22:33:10 2014 -0700 Fix typos --- lmo.c | 4 ++-- xt/primecount-approx.t | 1 - 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/lmo.c b/lmo.c index 4004ba3..1b95dd1 100644 --- a/lmo.c +++ b/lmo.c @@ -7,7 +7,7 @@ * * Prime counts using the extended Lagarias-Miller-Odlyzko combinatorial method. * - * Copyright (c) 2013 Dana Jacobsen (d...@acm.org) + * Copyright (c) 2013-2014 Dana Jacobsen (d...@acm.org) * This is free software; you can redistribute it and/or modify it under * the same terms as the Perl 5 programming language system itself. * @@ -344,7 +344,7 @@ UV legendre_phi(UV x, UV a) /* Shortcuts for large values, from R. Andrew Ohana */ if (a > (x >> 1)) return 1; - /* If a > prime_count(2^32), then we can need not be concerned with composite + /* If a > prime_count(2^32), then we need not be concerned with composite * x values with all factors > 2^32, as x is limited to 64-bit. */ if (a > 203280221) { /* prime_count(2**32) */ UV pc = _XS_LMO_pi(x); diff --git a/xt/primecount-approx.t b/xt/primecount-approx.t index 38a8dc6..e99aec0 100644 --- a/xt/primecount-approx.t +++ b/xt/primecount-approx.t @@ -139,7 +139,6 @@ foreach my $n (sort {$a <=> $b} keys %pivals) { cmp_ok( ''.prime_count_upper($n), '>=', $pin, "Pi($n) <= upper estimate" ); cmp_ok( ''.prime_count_lower($n), '<=', $pin, "Pi($n) >= lower estimate" ); # Result may be bigint, so turn into float for percentage comparison - print "n = '$n'\n"; my $approx = 0.0 + (''.prime_count_approx($n)); my $percent_limit = ($n > 1000000000000) ? 0.00005 : ($n > 10000000000) ? 0.0002 -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list Pkg-perl-cvs-commits@lists.alioth.debian.org http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits