From efaa61e24beb535fda79f980bb05126966ecca87 Mon Sep 17 00:00:00 2001 From: David Steinbrunner Date: Tue, 21 May 2013 07:16:19 -0400 Subject: typo fix for Storable Bump $VERSION. typo fixes for Math::BigRat Bump $VERSION. --- dist/Math-BigRat/lib/Math/BigRat.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'dist/Math-BigRat') 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 '+') -- cgit v1.2.1