diff options
| author | David Steinbrunner <dsteinbrunner@pobox.com> | 2013-05-21 07:16:19 -0400 |
|---|---|---|
| committer | James E Keenan <jkeenan@cpan.org> | 2013-05-25 14:46:33 +0200 |
| commit | efaa61e24beb535fda79f980bb05126966ecca87 (patch) | |
| tree | e18d9167624658ad184027a9967151428d262199 /dist/Math-BigRat | |
| parent | d80134284328cd5128b0a17920632e7b70625b46 (diff) | |
| download | perl-efaa61e24beb535fda79f980bb05126966ecca87.tar.gz | |
typo fix for Storable
Bump $VERSION.
typo fixes for Math::BigRat
Bump $VERSION.
Diffstat (limited to 'dist/Math-BigRat')
| -rw-r--r-- | dist/Math-BigRat/lib/Math/BigRat.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/dist/Math-BigRat/lib/Math/BigRat.pm b/dist/Math-BigRat/lib/Math/BigRat.pm index 757a03b8f3..15b2ed08fe 100644 --- a/dist/Math-BigRat/lib/Math/BigRat.pm +++ b/dist/Math-BigRat/lib/Math/BigRat.pm @@ -24,7 +24,7 @@ use vars qw($VERSION @ISA $upgrade $downgrade @ISA = qw(Math::BigFloat); -$VERSION = '0.2605'; +$VERSION = '0.2606'; $VERSION = eval $VERSION; # inherit overload from Math::BigFloat, but disable the bitwise ops that don't @@ -258,7 +258,7 @@ sub new if ($n->{sign} =~ /^[+-]$/ && $d->{sign} =~ /^[+-]$/) { - # both parts are ok as integers (wierd things like ' 1e0' + # both parts are ok as integers (weird things like ' 1e0' $self->{_n} = $MBI->_copy($n->{value}); $self->{_d} = $MBI->_copy($d->{value}); $self->{sign} = $n->{sign}; @@ -446,7 +446,7 @@ sub bneg return $x if $x->modify('bneg'); - # for +0 dont negate (to have always normalized +0). Does nothing for 'NaN' + # for +0 do not negate (to have always normalized +0). Does nothing for 'NaN' $x->{sign} =~ tr/+-/-+/ unless ($x->{sign} eq '+' && $MBI->_is_zero($x->{_n})); $x; } @@ -1271,7 +1271,7 @@ sub bsqrt $x->{_n} = _float_from_part( $x->{_n} )->bsqrt(); $x->{_d} = _float_from_part( $x->{_d} )->bsqrt(); - # XXX TODO: we probably can optimze this: + # XXX TODO: we probably can optimize this: # if sqrt(D) was not integer if ($x->{_d}->{_es} ne '+') |