summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Math/BigRat.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Math/BigRat.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/Math/BigRat.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/lib/Math/BigRat.pm b/Master/tlpkg/tlperl/lib/Math/BigRat.pm
index a70a42905a9..15b2ed08fe8 100644
--- a/Master/tlpkg/tlperl/lib/Math/BigRat.pm
+++ b/Master/tlpkg/tlperl/lib/Math/BigRat.pm
@@ -24,7 +24,7 @@ use vars qw($VERSION @ISA $upgrade $downgrade
@ISA = qw(Math::BigFloat);
-$VERSION = '0.2604';
+$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 '+')
@@ -1925,7 +1925,7 @@ Euler's number.
This method was added in v0.20 of Math::BigRat (May 2007).
-See also L</blog()>.
+See also C<blog()>.
=head2 bnok()