[libmath-prime-util-perl] 21/29: Make is_prime go to is_prob_prime after initial tests

[Partha P. Mukherjee]

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 1478d340f7638e93039e449e4e4077f06e04c7ff
Author: Dana Jacobsen <dana at acm.org>
Date:   Sun May 19 00:13:18 2013 -0700

    Make is_prime go to is_prob_prime after initial tests
---
 util.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/util.c b/util.c
index 88c33f5..ffcf524 100644
--- a/util.c
+++ b/util.c
@@ -171,7 +171,8 @@ int _XS_is_prime(UV n)
             :  -1;
   release_prime_cache(sieve);
 
-  return (isprime >= 0)  ?  isprime  :  _is_prime7(n);
+  /* return (isprime >= 0)  ?  isprime  :  _is_prime7(n); */
+  return (isprime >= 0)  ?  isprime  :  _XS_is_prob_prime(n);
 }
 
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git