diff options
author | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2016-12-15 14:38:20 +0000 |
---|---|---|
committer | Chris 'BinGOs' Williams <chris@bingosnet.co.uk> | 2016-12-15 14:38:20 +0000 |
commit | 15f1cdaa794f4296441c49c43bb734aa7e2070e4 (patch) | |
tree | 3a944f386ff1c8b470c19eb68f155e7fbbfd42de /cpan/Math-BigRat | |
parent | f4d243dc5118b86f8e80f856d43d79b04667d155 (diff) | |
download | perl-15f1cdaa794f4296441c49c43bb734aa7e2070e4.tar.gz |
Update Math-BigRat to CPAN version 0.2611
[DELTA]
2016-12-13 v0.2611 pjacklam
* Add more logic to Makefile.PL regarding INSTALLDIRS (CPAN RT #119199
and #119225).
2016-12-11 v0.2610 pjacklam
* Fix Makefile.PL so that this module installs over the core version.
Diffstat (limited to 'cpan/Math-BigRat')
-rw-r--r-- | cpan/Math-BigRat/lib/Math/BigRat.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/cpan/Math-BigRat/lib/Math/BigRat.pm b/cpan/Math-BigRat/lib/Math/BigRat.pm index f4a4d2b9ac..c604a2706f 100644 --- a/cpan/Math-BigRat/lib/Math/BigRat.pm +++ b/cpan/Math-BigRat/lib/Math/BigRat.pm @@ -20,7 +20,7 @@ use Carp (); use Math::BigFloat '1.999718'; -our $VERSION = '0.2609'; +our $VERSION = '0.2611'; our @ISA = qw(Math::BigFloat); @@ -669,7 +669,7 @@ sub bsstr { my ($class, $x) = ref($_[0]) ? (undef, $_[0]) : objectify(1, @_); if ($x->{sign} !~ /^[+-]$/) { # inf, NaN etc - my $s = $x->{sign}; + my $s = $x->{sign}; $s =~ s/^\+//; # +inf => inf return $s; } @@ -1324,7 +1324,7 @@ sub bpow { ($x->{_n}, $x->{_d}) = ($x->{_d}, $x->{_n}); # swap } # correct sign; + ** + => + - + $x->{sign} = '+' if $x->{sign} eq '-' && $LIB->_is_even($y->{_n}); return $x->round(@r); } |