summaryrefslogtreecommitdiff
path: root/cpan/Math-BigInt-FastCalc
diff options
context:
space:
mode:
authorNicolas R <atoomic@cpan.org>2022-07-20 19:25:41 +0000
committerℕicolas ℝ <nicolas@atoomic.org>2022-07-20 14:49:02 -0600
commit119199b1a4e490b69342c09058ab33a628e5c801 (patch)
tree8b10a420a29ab470992b563c1609dfedf3f3cb7f /cpan/Math-BigInt-FastCalc
parent04ce75ea5d4462d0a877e2912d76ce95fe31251f (diff)
downloadperl-119199b1a4e490b69342c09058ab33a628e5c801.tar.gz
Sync Math::BigInt::FastCalc with CPAN 0.5013
Sync test files with Math-BigInt
Diffstat (limited to 'cpan/Math-BigInt-FastCalc')
-rw-r--r--cpan/Math-BigInt-FastCalc/lib/Math/BigInt/FastCalc.pm2
-rw-r--r--cpan/Math-BigInt-FastCalc/t/biglog.t11
2 files changed, 5 insertions, 8 deletions
diff --git a/cpan/Math-BigInt-FastCalc/lib/Math/BigInt/FastCalc.pm b/cpan/Math-BigInt-FastCalc/lib/Math/BigInt/FastCalc.pm
index f20c8eb1d8..ee2c29de3b 100644
--- a/cpan/Math-BigInt-FastCalc/lib/Math/BigInt/FastCalc.pm
+++ b/cpan/Math-BigInt-FastCalc/lib/Math/BigInt/FastCalc.pm
@@ -12,7 +12,7 @@ BEGIN {
our @ISA = qw< Math::BigInt::Calc >;
}
-our $VERSION = '0.5012';
+our $VERSION = '0.5013';
my $MAX_EXP_F; # the maximum possible base 10 exponent with "no integer"
my $MAX_EXP_I; # the maximum possible base 10 exponent with "use integer"
diff --git a/cpan/Math-BigInt-FastCalc/t/biglog.t b/cpan/Math-BigInt-FastCalc/t/biglog.t
index 18f959b39c..a33eedf31b 100644
--- a/cpan/Math-BigInt-FastCalc/t/biglog.t
+++ b/cpan/Math-BigInt-FastCalc/t/biglog.t
@@ -36,7 +36,6 @@ is($class->new(2)->bexp(), '7', "$class->new(2)->bexp()");
is($class->new(3)->bexp(), '20', "$class->new(3)->bexp()");
###############################################################################
-###############################################################################
# Math::BigFloat tests
###############################################################################
@@ -146,7 +145,7 @@ is($class->new("10")->bpow("0.6", 10), "3.981071706",
qq|$class->new("10")->bpow("0.6", 10)|);
# blog should handle bigint input
-is(Math::BigFloat::blog(Math::BigInt->new(100), 10), 2, "blog(100)");
+is(Math::BigFloat->blog(Math::BigInt->new(100), 10), 2, "blog(100)");
###############################################################################
# some integer results
@@ -190,9 +189,9 @@ test_bpow('9.86902225', '0.5', undef, '3.1415');
test_bpow('0.2', '0.41', 10, '0.5169187652');
-is($class->new("0.01")->bpow("28.4", 40)->bsstr(),
- '1584893192461113485202101373391507013269e-96',
- qq|$class->new("0.01")->bpow("28.4", 40)->bsstr()|);
+is($class->new("0.1")->bpow("28.4", 40)->bsstr(),
+ '3981071705534972507702523050877520434877e-68',
+ qq|$class->new("0.1")->bpow("28.4", 40)->bsstr()|);
# The following test takes too long.
#is($class->new("2")->bpow("-1034.5", 40)->bsstr(),
@@ -231,8 +230,6 @@ is($class->new("-394.84010945715266885")->bexp(20)->bsstr(),
# all done
-1;
-
###############################################################################
sub test_bpow {