[libmath-prime-util-perl] 13/14: Move the a=1 pbrent into XS.xs instead of factor.h

[Partha P. Mukherjee]

This is an automated email from the git hooks/post-receive script.

ppm-guest pushed a commit to annotated tag v0.25
in repository libmath-prime-util-perl.

commit 6b2a1850b7b7764650d4696e58ea0c3acfcc669f
Author: Dana Jacobsen <dana at acm.org>
Date:   Tue Mar 19 12:40:56 2013 -0700

    Move the a=1 pbrent into XS.xs instead of factor.h
---
 Changes  | 2 +-
 XS.xs    | 5 +++++
 factor.h | 2 --
 3 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/Changes b/Changes
index 0102f37..22b4ef7 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,6 @@
 Revision history for Perl extension Math::Prime::Util.
 
-0.25 xx March 2013
+0.25 19 March 2013
 
     - Speed up p-1 stage 2 factoring.  Combined with some minor changes to the
       general factoring combination, ~20% faster for 19 digit semiprimes.
diff --git a/XS.xs b/XS.xs
index ff46ecc..ba3199e 100644
--- a/XS.xs
+++ b/XS.xs
@@ -15,6 +15,11 @@
 #include "lehmer.h"
 #include "aks.h"
 
+static int pbrent_factor_a1(UV n, UV *factors, UV maxrounds) {
+  return pbrent_factor(n, factors, maxrounds, 1);
+}
+
+
 MODULE = Math::Prime::Util	PACKAGE = Math::Prime::Util
 
 PROTOTYPES: ENABLE
diff --git a/factor.h b/factor.h
index cff4851..f8919a7 100644
--- a/factor.h
+++ b/factor.h
@@ -18,8 +18,6 @@ extern int racing_squfof_factor(UV n, UV *factors, UV rounds);
 
 
 extern int pbrent_factor(UV n, UV *factors, UV maxrounds, UV a);
-static int pbrent_factor_a1(UV n, UV *factors, UV maxrounds)
- { return pbrent_factor(n, factors, maxrounds, 1); }
 
 extern int prho_factor(UV n, UV *factors, UV maxrounds);
 

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