Sync bignum with CPAN version 0.51
authorJames E Keenan <jkeenan@cpan.org>
Fri, 12 Oct 2018 12:04:22 +0000 (08:04 -0400)
committerJames E Keenan <jkeenan@cpan.org>
Fri, 12 Oct 2018 12:04:22 +0000 (08:04 -0400)
Porting/Maintainers.pl
cpan/bignum/lib/Math/BigFloat/Trace.pm
cpan/bignum/lib/Math/BigInt/Trace.pm
cpan/bignum/lib/bigint.pm
cpan/bignum/lib/bignum.pm
cpan/bignum/lib/bigrat.pm
cpan/bignum/t/option_l.t

index c23af8d..6aed94a 100755 (executable)
@@ -185,7 +185,7 @@ use File::Glob qw(:case);
     },
 
     'bignum' => {
-        'DISTRIBUTION' => 'PJACKLAM/bignum-0.50.tar.gz',
+        'DISTRIBUTION' => 'PJACKLAM/bignum-0.51.tar.gz',
         'FILES'        => q[cpan/bignum],
         'EXCLUDED'     => [
             qr{^t/author-},
index 5c2525d..2fc0693 100644 (file)
@@ -13,7 +13,7 @@ our ($accuracy, $precision, $round_mode, $div_scale);
 
 our @ISA = qw(Exporter Math::BigFloat);
 
-our $VERSION = '0.50';
+our $VERSION = '0.51';
 
 use overload;                   # inherit overload from Math::BigFloat
 
index 500e128..5517bed 100644 (file)
@@ -13,7 +13,7 @@ our ($accuracy, $precision, $round_mode, $div_scale);
 
 our @ISA = qw(Exporter Math::BigInt);
 
-our $VERSION = '0.50';
+our $VERSION = '0.51';
 
 use overload;                   # inherit overload from Math::BigInt
 
index b5f1fae..8d7048b 100644 (file)
@@ -4,7 +4,7 @@ use 5.010;
 use strict;
 use warnings;
 
-our $VERSION = '0.50';
+our $VERSION = '0.51';
 
 use Exporter;
 our @ISA            = qw( Exporter );
index 89958c9..55300c8 100644 (file)
@@ -4,7 +4,7 @@ use 5.010;
 use strict;
 use warnings;
 
-our $VERSION = '0.50';
+our $VERSION = '0.51';
 
 use Exporter;
 our @ISA            = qw( bigint );
index ec9e72b..0a98147 100644 (file)
@@ -4,7 +4,7 @@ use 5.010;
 use strict;
 use warnings;
 
-our $VERSION = '0.50';
+our $VERSION = '0.51';
 
 use Exporter;
 our @ISA            = qw( bigint );
index 9e4d4ca..c3a1d5d 100644 (file)
@@ -9,12 +9,12 @@ use Test::More tests => 19;
 
 use bignum;
 
+# Catch warnings.
+
 my @WARNINGS;
-{
-    # This hack is to catch warnings. Math::BigInt imports 'carp' from 'Carp',
-    # so we redefine it to catch the warnings.
-    *Math::BigInt::carp = sub { push @WARNINGS, $_[0]; };
-}
+local $SIG{__WARN__} = sub {
+    push @WARNINGS, $_[0];
+};
 
 my $rc;