summaryrefslogtreecommitdiff
path: root/cpan/Math-BigRat
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2016-12-15 14:38:20 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2016-12-15 14:38:20 +0000
commit15f1cdaa794f4296441c49c43bb734aa7e2070e4 (patch)
tree3a944f386ff1c8b470c19eb68f155e7fbbfd42de /cpan/Math-BigRat
parentf4d243dc5118b86f8e80f856d43d79b04667d155 (diff)
downloadperl-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.pm6
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);
}