diff options
| author | M. J. T. Guy <mjtg@cus.cam.ac.uk> | 1998-07-24 19:29:53 +0100 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-26 02:03:01 +0000 |
| commit | e3c7ef20866011e0e98de5b78863094f34fd2bd6 (patch) | |
| tree | eb0effbd52941e500472df7f36ff4aca8e5d2225 /t/lib/bigintpm.t | |
| parent | 731da2878475fb47e9cdf65e54a2c72c4e8e3c26 (diff) | |
| download | perl-e3c7ef20866011e0e98de5b78863094f34fd2bd6.tar.gz | |
fix behavior of <=> on bigints
Message-Id: <E0yzlfF-0004kz-00@taurus.cus.cam.ac.uk>
Subject: [PATCH] Re: Math::BigInt <=> op is not correct.
p4raw-id: //depot/maint-5.005/perl@1652
Diffstat (limited to 't/lib/bigintpm.t')
| -rwxr-xr-x | t/lib/bigintpm.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/t/lib/bigintpm.t b/t/lib/bigintpm.t index ebaecac21a..4357975f2b 100755 --- a/t/lib/bigintpm.t +++ b/t/lib/bigintpm.t @@ -10,7 +10,7 @@ use Math::BigInt; $test = 0; $| = 1; -print "1..246\n"; +print "1..247\n"; while (<DATA>) { chop; if (s/^&//) { @@ -116,6 +116,7 @@ abc:+0:NaN +124:+123:+1 -123:-124:+1 -124:-123:-1 ++100:+5:+1 &badd abc:abc:NaN abc:+0:NaN |