Upgrade to Math::BigInt v1.65, Math::BigRat v0.10,

and bignum v0.14.

p4raw-id: //depot/perl@20000

3 files changed, 11 insertions, 6 deletions

diff --git a/t/lib/Math/BigFloat/Subclass.pm b/t/lib/Math/BigFloat/Subclass.pm
index 950c92dbd0..2ec948e7c5 100644
--- a/t/lib/Math/BigFloat/Subclass.pm
+++ b/t/lib/Math/BigFloat/Subclass.pm
@@ -6,13 +6,13 @@ require 5.005_02;
 use strict;
 
 use Exporter;
-use Math::BigFloat(1.30);
+use Math::BigFloat(1.38);
 use vars qw($VERSION @ISA $PACKAGE
             $accuracy $precision $round_mode $div_scale);
 
 @ISA = qw(Exporter Math::BigFloat);
 
-$VERSION = 0.03;
+$VERSION = 0.04;
 
 use overload; 		# inherit overload from BigInt
 
diff --git a/t/lib/Math/BigInt/BareCalc.pm b/t/lib/Math/BigInt/BareCalc.pm
index 797957f748..1a69e4035d 100644
--- a/t/lib/Math/BigInt/BareCalc.pm
+++ b/t/lib/Math/BigInt/BareCalc.pm
@@ -14,7 +14,7 @@ $VERSION = '0.02';
 
 # uses Calc, but only features the strictly necc. methods.
 
-use Math::BigInt::Calc '0.29';
+use Math::BigInt::Calc '0.33';
 
 BEGIN
   {
@@ -28,6 +28,7 @@ BEGIN
     my $name  = "Math::BigInt::Calc::_$_";
     *{"Math::BigInt::BareCalc::_$_"} = \&$name;
     }
+  print "# BareCalc using Calc v$Math::BigInt::Calc::VERSION\n";
   }
 
 # catch and throw away
diff --git a/t/lib/Math/BigInt/Subclass.pm b/t/lib/Math/BigInt/Subclass.pm
index 688ad23769..0cbd15923f 100644
--- a/t/lib/Math/BigInt/Subclass.pm
+++ b/t/lib/Math/BigInt/Subclass.pm
@@ -6,14 +6,16 @@ require 5.005_02;
 use strict;
 
 use Exporter;
-use Math::BigInt(1.56);
+use Math::BigInt (1.64);
+# $lib is for the "lib => " test
 use vars qw($VERSION @ISA $PACKAGE @EXPORT_OK
+	    $lib						
             $accuracy $precision $round_mode $div_scale);
 
 @ISA = qw(Exporter Math::BigInt);
 @EXPORT_OK = qw(bgcd objectify);
 
-$VERSION = 0.03;
+$VERSION = 0.04;
 
 use overload;	# inherit overload from BigInt
 
@@ -21,6 +23,7 @@ use overload;	# inherit overload from BigInt
 $accuracy = $precision = undef;
 $round_mode = 'even';
 $div_scale = 40;
+$lib = '';
 
 sub new
 {
@@ -67,7 +70,8 @@ sub import
   my @a; my $t = 0;
   foreach (@_)
     {
-    $t = 0, next if $t == 1;
+    # remove the "lib => foo" parameters and store it
+    $lib = $_, $t = 0, next if $t == 1;
     if ($_ eq 'lib')
       {
       $t = 1; next;