summaryrefslogtreecommitdiff
path: root/dist/Math-BigInt/lib/Math/BigInt.pm
diff options
context:
space:
mode:
authorpjacklam <pjacklam@online.no>2011-02-04 18:02:51 -0800
committerFather Chrysostomos <sprout@cpan.org>2011-02-05 06:05:41 -0800
commitdb2e1fb3c24129b0e583208b5ba375091b9dee6a (patch)
tree958574e426d89a5e02ce994e1ff89e289625a4a8 /dist/Math-BigInt/lib/Math/BigInt.pm
parent53edd7c363431dd82fce57f11df0b0131a7723e5 (diff)
downloadperl-db2e1fb3c24129b0e583208b5ba375091b9dee6a.tar.gz
[perl #83406] Library compatibility and API documentation (v1.991).
- dist/Math-BigInt/lib/Math/BigFloat.pm: Increment version number. - dist/Math-BigInt/lib/Math/BigInt.pm: Add workaround for library inconsistencies (Math::BigInt::Calc vs. Math::BigInt::GMP). This makes older versions of Math::BigInt::GMP work with latest version of Math::BigInt. - dist/Math-BigInt/lib/Math/BigInt/Calc.pm: Correct and extend API documentation. Increment version number. - dist/Math-BigInt/lib/Math/BigInt/CalcEmu.pm: Increment version number.
Diffstat (limited to 'dist/Math-BigInt/lib/Math/BigInt.pm')
-rw-r--r--dist/Math-BigInt/lib/Math/BigInt.pm7
1 files changed, 6 insertions, 1 deletions
diff --git a/dist/Math-BigInt/lib/Math/BigInt.pm b/dist/Math-BigInt/lib/Math/BigInt.pm
index 177894ab42..9ce39f45e4 100644
--- a/dist/Math-BigInt/lib/Math/BigInt.pm
+++ b/dist/Math-BigInt/lib/Math/BigInt.pm
@@ -18,7 +18,7 @@ package Math::BigInt;
my $class = "Math::BigInt";
use 5.006002;
-$VERSION = '1.99_05';
+$VERSION = '1.991';
@ISA = qw(Exporter);
@EXPORT_OK = qw(objectify bgcd blcm);
@@ -1835,6 +1835,11 @@ sub bmodinv
($x->{value}, $x->{sign}) = $CALC->_modinv($x->{value}, $y->{value});
return $x->bnan() if !defined $x->{value};
+ # Library inconsistency workaround: _modinv() in Math::BigInt::GMP versions
+ # <= 1.32 return undef rather than a "+" for the sign.
+
+ $x->{sign} = '+' unless defined $x->{sign};
+
# When one or both arguments are negative, we have the following
# relations. If x and y are positive:
#