Permalink
Browse files

Add fast test that requires the actual generation of the next primes …

…not supplied by the code.
  • Loading branch information...
1 parent d4a9477 commit 12f4938c02677afe7646d77fd96a65f559145ad8 @colomon committed Apr 22, 2012
Showing with 1 addition and 0 deletions.
  1. +1 −0 t/01-basic.t
View
@@ -4,6 +4,7 @@ use Math::Prime;
is primes[^10], [2, 3, 5, 7, 11, 13, 17, 19, 23, 29], "First ten primes are correct";
is primes[60..69], [283, 293, 307, 311, 313, 317, 331, 337, 347, 349], "Primes 60 through 69 are correct";
is primes[60..69], [283, 293, 307, 311, 313, 317, 331, 337, 347, 349], "Primes 60 through 69 are still correct";
+is primes[98..105], [523, 541, 547, 557, 563, 569, 571, 577], "Primes 98 through 105 are correct";
is (1..20).grep(&is-prime).join(', '), '2, 3, 5, 7, 11, 13, 17, 19', 'is-prime 1..20';

0 comments on commit 12f4938

Please sign in to comment.