diff options
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Math/BigInt')
-rw-r--r-- | Master/tlpkg/tlperl/lib/Math/BigInt/Calc.pm | 8 | ||||
-rw-r--r-- | Master/tlpkg/tlperl/lib/Math/BigInt/CalcEmu.pm | 14 | ||||
-rw-r--r-- | Master/tlpkg/tlperl/lib/Math/BigInt/FastCalc.pm | 2 | ||||
-rw-r--r-- | Master/tlpkg/tlperl/lib/Math/BigInt/Trace.pm | 2 |
4 files changed, 15 insertions, 11 deletions
diff --git a/Master/tlpkg/tlperl/lib/Math/BigInt/Calc.pm b/Master/tlpkg/tlperl/lib/Math/BigInt/Calc.pm index 69092370533..3d886910005 100644 --- a/Master/tlpkg/tlperl/lib/Math/BigInt/Calc.pm +++ b/Master/tlpkg/tlperl/lib/Math/BigInt/Calc.pm @@ -2,9 +2,9 @@ package Math::BigInt::Calc; use 5.006002; use strict; -# use warnings; # dont use warnings for older Perls +# use warnings; # do not use warnings for older Perls -our $VERSION = '1.997'; +our $VERSION = '1.998'; # Package to store unsigned big integers in decimal and do math with them @@ -23,7 +23,7 @@ our $VERSION = '1.997'; # Beware of things like: # $i = $i * $y + $car; $car = int($i / $BASE); $i = $i % $BASE; -# This works on x86, but fails on ARM (SA1100, iPAQ) due to whoknows what +# This works on x86, but fails on ARM (SA1100, iPAQ) due to who knows what # reasons. So, use this instead (slower, but correct): # $i = $i * $y + $car; $car = int($i / $BASE); $i -= $BASE * $car; @@ -1566,7 +1566,7 @@ sub _nok { else { - # Make a copy of the original n, since we'll be modifing n in-place. + # Make a copy of the original n, since we'll be modifying n in-place. my $n_orig = _copy($c, $n); diff --git a/Master/tlpkg/tlperl/lib/Math/BigInt/CalcEmu.pm b/Master/tlpkg/tlperl/lib/Math/BigInt/CalcEmu.pm index c82e1539865..bcf74a8ab8f 100644 --- a/Master/tlpkg/tlperl/lib/Math/BigInt/CalcEmu.pm +++ b/Master/tlpkg/tlperl/lib/Math/BigInt/CalcEmu.pm @@ -2,10 +2,10 @@ package Math::BigInt::CalcEmu; use 5.006002; use strict; -# use warnings; # dont use warnings for older Perls +# use warnings; # do not use warnings for older Perls use vars qw/$VERSION/; -$VERSION = '1.998'; +$VERSION = '1.9991'; package Math::BigInt; @@ -305,11 +305,15 @@ using a call to the native lib. =head1 METHODS -=head2 __emu_bxor +=over -=head2 __emu_band +=item __emu_bxor -=head2 __emu_bior +=item __emu_band + +=item __emu_bior + +=back =head1 LICENSE diff --git a/Master/tlpkg/tlperl/lib/Math/BigInt/FastCalc.pm b/Master/tlpkg/tlperl/lib/Math/BigInt/FastCalc.pm index 81f29a16e4f..9bf5a60839e 100644 --- a/Master/tlpkg/tlperl/lib/Math/BigInt/FastCalc.pm +++ b/Master/tlpkg/tlperl/lib/Math/BigInt/FastCalc.pm @@ -8,7 +8,7 @@ use Math::BigInt::Calc 1.997; use vars '$VERSION'; -$VERSION = '0.30'; +$VERSION = '0.31'; ############################################################################## # global constants, flags and accessory diff --git a/Master/tlpkg/tlperl/lib/Math/BigInt/Trace.pm b/Master/tlpkg/tlperl/lib/Math/BigInt/Trace.pm index 4c51e5773da..79fc0970e47 100644 --- a/Master/tlpkg/tlperl/lib/Math/BigInt/Trace.pm +++ b/Master/tlpkg/tlperl/lib/Math/BigInt/Trace.pm @@ -12,7 +12,7 @@ use vars qw($VERSION @ISA $PACKAGE @EXPORT_OK @ISA = qw(Exporter Math::BigInt); -$VERSION = '0.32'; +$VERSION = '0.36'; use overload; # inherit overload from BigInt |