From: Steve Hay Date: Wed, 7 Dec 2016 08:25:50 +0000 (+0000) Subject: Upgrade Math::BigInt from version 1.999802 to 1.999803 X-Git-Tag: v5.25.8~66 X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/cbc87e04ce11c9be486d663c844e6e3c9ec5eb98 Upgrade Math::BigInt from version 1.999802 to 1.999803 --- diff --git a/MANIFEST b/MANIFEST index efe9d80..2c89f48 100644 --- a/MANIFEST +++ b/MANIFEST @@ -1730,6 +1730,7 @@ cpan/Math-BigInt/t/from_oct-mbf.t Test Math::BigInt cpan/Math-BigInt/t/inf_nan.t Special tests for inf and *NaN* handling cpan/Math-BigInt/t/isa.t Test for Math::BigInt inheritance cpan/Math-BigInt/t/lib_load.t Test sane lib names +cpan/Math-BigInt/t/Math/BigFloat/#Subclass.pm# cpan/Math-BigInt/t/Math/BigFloat/Subclass.pm Empty subclass of BigFloat for test cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm Bigint's simulation of Calc cpan/Math-BigInt/t/Math/BigInt/Lib/Minimal.pm diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index 241476e..a70e611 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -762,10 +762,9 @@ use File::Glob qw(:case); }, 'Math::BigInt' => { - 'DISTRIBUTION' => 'PJACKLAM/Math-BigInt-1.999802.tar.gz', + 'DISTRIBUTION' => 'PJACKLAM/Math-BigInt-1.999803.tar.gz', 'FILES' => q[cpan/Math-BigInt], 'EXCLUDED' => [ - qr{^inc/}, qr{^examples/}, qr{^t/author-}, qw( t/00sig.t diff --git a/cpan/Math-BigInt/lib/Math/BigFloat.pm b/cpan/Math-BigInt/lib/Math/BigFloat.pm index 415e082..eee9897 100644 --- a/cpan/Math-BigInt/lib/Math/BigFloat.pm +++ b/cpan/Math-BigInt/lib/Math/BigFloat.pm @@ -19,8 +19,7 @@ use warnings; use Carp (); use Math::BigInt (); -our $VERSION = '1.999802'; -$VERSION = eval $VERSION; +our $VERSION = '1.999803'; require Exporter; our @ISA = qw/Math::BigInt/; diff --git a/cpan/Math-BigInt/lib/Math/BigInt.pm b/cpan/Math-BigInt/lib/Math/BigInt.pm index 39001e9..bd98fda 100644 --- a/cpan/Math-BigInt/lib/Math/BigInt.pm +++ b/cpan/Math-BigInt/lib/Math/BigInt.pm @@ -20,8 +20,7 @@ use warnings; use Carp (); -our $VERSION = '1.999802'; -$VERSION = eval $VERSION; +our $VERSION = '1.999803'; our @ISA = qw(Exporter); our @EXPORT_OK = qw(objectify bgcd blcm); diff --git a/cpan/Math-BigInt/lib/Math/BigInt/Calc.pm b/cpan/Math-BigInt/lib/Math/BigInt/Calc.pm index aca84b5..c0a089b 100644 --- a/cpan/Math-BigInt/lib/Math/BigInt/Calc.pm +++ b/cpan/Math-BigInt/lib/Math/BigInt/Calc.pm @@ -7,8 +7,7 @@ use warnings; use Carp; use Math::BigInt::Lib; -our $VERSION = '1.999802'; -$VERSION = eval $VERSION; +our $VERSION = '1.999803'; our @ISA = ('Math::BigInt::Lib'); diff --git a/cpan/Math-BigInt/lib/Math/BigInt/CalcEmu.pm b/cpan/Math-BigInt/lib/Math/BigInt/CalcEmu.pm index 45b47c3..13cc8e8 100644 --- a/cpan/Math-BigInt/lib/Math/BigInt/CalcEmu.pm +++ b/cpan/Math-BigInt/lib/Math/BigInt/CalcEmu.pm @@ -4,8 +4,7 @@ use 5.006001; use strict; use warnings; -our $VERSION = '1.999802'; -$VERSION = eval $VERSION; +our $VERSION = '1.999803'; package Math::BigInt; diff --git a/cpan/Math-BigInt/lib/Math/BigInt/Lib.pm b/cpan/Math-BigInt/lib/Math/BigInt/Lib.pm index 8bd4038..32ccef9 100644 --- a/cpan/Math-BigInt/lib/Math/BigInt/Lib.pm +++ b/cpan/Math-BigInt/lib/Math/BigInt/Lib.pm @@ -4,8 +4,7 @@ use 5.006001; use strict; use warnings; -our $VERSION = '1.999802'; -$VERSION = eval $VERSION; +our $VERSION = '1.999803'; use Carp; diff --git a/cpan/Math-BigInt/t/Math/BigFloat/#Subclass.pm# b/cpan/Math-BigInt/t/Math/BigFloat/#Subclass.pm# new file mode 100644 index 0000000..f35e267 --- /dev/null +++ b/cpan/Math-BigInt/t/Math/BigFloat/#Subclass.pm# @@ -0,0 +1,49 @@ +#!perl + +# for testing subclassing Math::BigFloat + +package Math::BigFloat::Subclass; + +require 5.006; + +use strict; +use warnings; + +use Exporter; +use Math::BigFloat 1.38; + +our ($accuracy, $precision, $round_mode, $div_scale); + +our @ISA = qw(Exporter Math::BigFloat); + +our $VERSION = "0.06"; + +use overload; # inherit overload from BigInt + +# Globals +$accuracy = $precision = undef; +$round_mode = 'even'; +$div_scale = 40; + +sub new { + my $proto = shift; + my $class = ref($proto) || $proto; + + my $value = shift; + my $a = $accuracy; $a = $_[0] if defined $_[0]; + my $p = $precision; $p = $_[1] if defined $_[1]; + # Store the floating point value + my $self = Math::BigFloat->new($value, $a, $p, $round_mode); + bless $self, $class; + $self->{'_custom'} = 1; # make sure this never goes away + return $self; +} + +BEGIN { + *objectify = \&Math::BigInt::objectify; + # to allow Math::BigFloat::Subclass::bgcd( ... ) style calls + *bgcd = \&Math::BigFloat::bgcd; + *blcm = \&Math::BigFloat::blcm; +} + +1; diff --git a/cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm b/cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm index fd4f385..86522d5 100644 --- a/cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm +++ b/cpan/Math-BigInt/t/Math/BigInt/BareCalc.pm @@ -5,7 +5,7 @@ package Math::BigInt::BareCalc; use strict; use warnings; -our $VERSION = '1.999801'; +our $VERSION = '1.999803'; # Package to to test Bigint's simulation of Calc diff --git a/cpan/Math-BigInt/t/calling.t b/cpan/Math-BigInt/t/calling.t index 3b23eab..56f0b46 100644 --- a/cpan/Math-BigInt/t/calling.t +++ b/cpan/Math-BigInt/t/calling.t @@ -6,8 +6,7 @@ use strict; use warnings; use lib 't'; -my $VERSION = '1.999800'; # adjust manually to match latest release -$VERSION = eval $VERSION; +my $VERSION = '1.999803'; # adjust manually to match latest release use Test::More tests => 5;