This is an automated email from the git hooks/post-receive script. gregoa pushed a commit to annotated tag v1.030099_001 in repository libnet-openid-common-perl.
commit e60adeaf0448654e8a81d50d0895c6717c6740c7 Author: Robert Norris <r...@eatenbyagrue.org> Date: Thu Nov 4 19:52:33 2010 +1100 move bi2bytes tests here from -Server --- t/06-bi2bytes.t | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/t/06-bi2bytes.t b/t/06-bi2bytes.t new file mode 100644 index 0000000..ecd43cc --- /dev/null +++ b/t/06-bi2bytes.t @@ -0,0 +1,14 @@ +#!/usr/bin/perl + +use strict; +use Test::More tests => 1080; +use Net::OpenID::Common; +use Math::BigInt; + +for my $num (1..1080) { + my $bi = Math::BigInt->new("$num"); + my $bytes = OpenID::util::bi2bytes($bi); + my $bi2 = OpenID::util::bytes2bi($bytes); + is($bi,$bi2); +} + -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-openid-common-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