summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2008-01-09 21:50:25 +0000
committerSteve Peters <steve@fisharerojo.org>2008-01-09 21:50:25 +0000
commit036846d3cb5fd43e75de71347d8307e819ae6788 (patch)
tree46da7e0e41d3a5dfab01319b8bbdd02870b552f4 /lib
parent3f9706904cac960ab6eb4535c94266e7878f3afb (diff)
downloadperl-036846d3cb5fd43e75de71347d8307e819ae6788.tar.gz
Upgrade to Math-Complex-1.43
p4raw-id: //depot/perl@32929
Diffstat (limited to 'lib')
-rw-r--r--lib/Math/Complex.pm3
-rwxr-xr-xlib/Math/Complex.t2
-rw-r--r--lib/Math/Trig.pm4
-rwxr-xr-xlib/Math/Trig.t4
4 files changed, 7 insertions, 6 deletions
diff --git a/lib/Math/Complex.pm b/lib/Math/Complex.pm
index 315bea4b82..3840219537 100644
--- a/lib/Math/Complex.pm
+++ b/lib/Math/Complex.pm
@@ -9,9 +9,10 @@ package Math::Complex;
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $Inf);
-$VERSION = 1.42;
+$VERSION = 1.43;
BEGIN {
+ # For 64-bit doubles, anyway.
my $IEEE_DBL_MAX = eval "1.7976931348623157e+308";
if ($^O eq 'unicosmk') {
$Inf = $IEEE_DBL_MAX;
diff --git a/lib/Math/Complex.t b/lib/Math/Complex.t
index 25c068d488..87a6bf7194 100755
--- a/lib/Math/Complex.t
+++ b/lib/Math/Complex.t
@@ -13,7 +13,7 @@ BEGIN {
}
}
-use Math::Complex 1.42;
+use Math::Complex 1.43;
use vars qw($VERSION);
diff --git a/lib/Math/Trig.pm b/lib/Math/Trig.pm
index 5bd85c5a69..f3a84e6a52 100644
--- a/lib/Math/Trig.pm
+++ b/lib/Math/Trig.pm
@@ -10,14 +10,14 @@ package Math::Trig;
use 5.005;
use strict;
-use Math::Complex 1.42;
+use Math::Complex 1.43;
use Math::Complex qw(:trig :pi);
use vars qw($VERSION $PACKAGE @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
@ISA = qw(Exporter);
-$VERSION = 1.07;
+$VERSION = 1.08;
my @angcnv = qw(rad2deg rad2grad
deg2rad deg2grad
diff --git a/lib/Math/Trig.t b/lib/Math/Trig.t
index ea19a6c604..b05e636280 100755
--- a/lib/Math/Trig.t
+++ b/lib/Math/Trig.t
@@ -28,8 +28,8 @@ BEGIN {
plan(tests => 135);
-use Math::Trig 1.07;
-use Math::Trig 1.07 qw(Inf);
+use Math::Trig 1.08;
+use Math::Trig 1.08 qw(Inf);
my $pip2 = pi / 2;