[libmath-prime-util-perl] 43/43: Fix typos
Partha P. Mukherjee
ppm-guest at moszumanska.debian.org
Thu May 21 18:53:09 UTC 2015
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 <dana at 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 (dana at acm.org)
+ * Copyright (c) 2013-2014 Dana Jacobsen (dana at 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
More information about the Pkg-perl-cvs-commits
mailing list