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 83600eb9e3633708e2e7a1914ef1a11602802c38
Author: Dana Jacobsen <d...@acm.org>
Date: Wed Jan 8 23:44:56 2014 -0800
Turn off default irand in tests that don't care
---
t/80-pp.t | 3 +++
t/81-bignum.t | 3 +++
2 files changed, 6 insertions(+)
diff --git a/t/80-pp.t b/t/80-pp.t
index fa5340a..9294d1a 100644
--- a/t/80-pp.t
+++ b/t/80-pp.t
@@ -303,6 +303,9 @@ require_ok 'Math::Prime::Util::PrimalityProving';
*LogarithmicIntegral = \&Math::Prime::Util::PP::LogarithmicIntegral;
*ExponentialIntegral = \&Math::Prime::Util::PP::ExponentialIntegral;
+# Turn off use of BRS - ECM tries to use this.
+prime_set_config( irand => sub { int(rand(4294967296.0)) } );
+
###############################################################################
$_ = 'this should not change';
diff --git a/t/81-bignum.t b/t/81-bignum.t
index 140b30a..a636b09 100644
--- a/t/81-bignum.t
+++ b/t/81-bignum.t
@@ -144,6 +144,9 @@ my $bigintlib = Math::BigInt->config()->{lib};
my $mpugmpver = $usegmp ? $Math::Prime::Util::GMP::VERSION : "<none>";
diag "BigInt $bignumver/$bigintver, lib: $bigintlib. MPU::GMP $mpugmpver\n";
+# Turn off use of BRS - ECM tries to use this.
+prime_set_config( irand => sub { int(rand(4294967296.0)) } );
+
###############################################################################
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
