[libmath-prime-util-perl] 26/29: Make sure test works on 32-bit platforms

[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 c1bd445da4143819a0cf8f352307040639122589
Author: Dana Jacobsen <dana at acm.org>
Date:   Sun May 19 00:35:12 2013 -0700

    Make sure test works on 32-bit platforms
---
 t/80-pp.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/80-pp.t b/t/80-pp.t
index f75607f..d5a69bb 100644
--- a/t/80-pp.t
+++ b/t/80-pp.t
@@ -577,7 +577,7 @@ is_deeply( [Math::Prime::Util::PP::primality_proof_lucas(100003)],
 is_deeply( [Math::Prime::Util::PP::primality_proof_bls75(1490266103)],
            [2, [1490266103, 'n-1', [2, 13, 19, 1597, 1889], [5, 2, 2, 2, 2]]],
            "primality_proof_bls75(1490266103)" );
-is_deeply( [Math::Prime::Util::PP::primality_proof_bls75("64020974585221")],
+is_deeply( [Math::Prime::Util::PP::primality_proof_bls75(Math::BigInt->new("64020974585221"))],
            [2, ["64020974585221", "n-1",
                ["B", 20000, "5154667841", 2], [2, 3, 5, 23], [2, 2, 2, 2]]],
            "primality_proof_bls75(64020974585221)" );

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