[libmath-prime-util-perl] 119/181: is_perfect_square doesn't use isqrt
Partha P. Mukherjee
ppm-guest at moszumanska.debian.org
Thu May 21 18:51:13 UTC 2015
This is an automated email from the git hooks/post-receive script.
ppm-guest pushed a commit to annotated tag v0.36
in repository libmath-prime-util-perl.
commit 1692d4413a675e22cba1a3a503ed6501dc674405
Author: Dana Jacobsen <dana at acm.org>
Date: Sun Jan 5 17:32:35 2014 -0800
is_perfect_square doesn't use isqrt
---
primality.c | 1 -
util.h | 2 +-
2 files changed, 1 insertion(+), 2 deletions(-)
diff --git a/primality.c b/primality.c
index 5d0fdbf..1a7b532 100644
--- a/primality.c
+++ b/primality.c
@@ -6,7 +6,6 @@
#include "ptypes.h"
#include "primality.h"
#include "mulmod.h"
-#define FUNC_isqrt 1
#define FUNC_gcd_ui 1
#define FUNC_is_perfect_square
#include "util.h"
diff --git a/util.h b/util.h
index ff4a99d..3c048df 100644
--- a/util.h
+++ b/util.h
@@ -46,7 +46,7 @@ extern UV znorder(UV a, UV n);
#define MPU_PROB_PRIME_BEST UVCONST(100000000)
#endif
-#if defined(FUNC_isqrt) || defined(FUNC_is_perfect_square)
+#if defined(FUNC_isqrt)
static UV isqrt(UV n) {
UV root;
#if BITS_PER_WORD == 32
--
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