[libmath-prime-util-perl] 72/181: Wrap large constants in UVCONST for 64-bit Perl on 32-bit machines
Partha P. Mukherjee
ppm-guest at moszumanska.debian.org
Thu May 21 18:51:08 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 4518c3649d308829134724ad13ee5dc73d6bc0c6
Author: Dana Jacobsen <dana at acm.org>
Date: Mon Dec 30 17:03:57 2013 -0800
Wrap large constants in UVCONST for 64-bit Perl on 32-bit machines
---
factor.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/factor.c b/factor.c
index 112a151..7b11512 100644
--- a/factor.c
+++ b/factor.c
@@ -381,9 +381,9 @@ UV* _divisor_list(UV n, UV *num_divisors)
*/
static const UV sigma_overflow[5] =
#if BITS_PER_WORD == 64
- {3000000000000000000, 3000000000, 2487240, 64260, 7026};
+ {UVCONST(3000000000000000000),UVCONST(3000000000),2487240,64260,7026};
#else
- { 845404560, 52560, 1548, 252, 84};
+ {UVCONST( 845404560), 52560, 1548, 252, 84};
#endif
UV divisor_sum(UV n, UV k)
{
--
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