Change 32929 by [EMAIL PROTECTED] on 2008/01/09 21:50:25
Upgrade to Math-Complex-1.43
Affected files ...
... //depot/perl/lib/Math/Complex.pm#35 edit
... //depot/perl/lib/Math/Complex.t#7 edit
... //depot/perl/lib/Math/Trig.pm#28 edit
... //depot/perl/lib/Math/Trig.t#10 edit
Differences ...
==== //depot/perl/lib/Math/Complex.pm#35 (text) ====
Index: perl/lib/Math/Complex.pm
--- perl/lib/Math/Complex.pm#34~32908~ 2008-01-08 18:36:33.000000000 -0800
+++ perl/lib/Math/Complex.pm 2008-01-09 13:50:25.000000000 -0800
@@ -9,9 +9,10 @@
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;
==== //depot/perl/lib/Math/Complex.t#7 (xtext) ====
Index: perl/lib/Math/Complex.t
--- perl/lib/Math/Complex.t#6~32908~ 2008-01-08 18:36:33.000000000 -0800
+++ perl/lib/Math/Complex.t 2008-01-09 13:50:25.000000000 -0800
@@ -13,7 +13,7 @@
}
}
-use Math::Complex 1.42;
+use Math::Complex 1.43;
use vars qw($VERSION);
==== //depot/perl/lib/Math/Trig.pm#28 (text) ====
Index: perl/lib/Math/Trig.pm
--- perl/lib/Math/Trig.pm#27~32908~ 2008-01-08 18:36:33.000000000 -0800
+++ perl/lib/Math/Trig.pm 2008-01-09 13:50:25.000000000 -0800
@@ -10,14 +10,14 @@
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
==== //depot/perl/lib/Math/Trig.t#10 (xtext) ====
Index: perl/lib/Math/Trig.t
--- perl/lib/Math/Trig.t#9~32914~ 2008-01-09 03:47:12.000000000 -0800
+++ perl/lib/Math/Trig.t 2008-01-09 13:50:25.000000000 -0800
@@ -28,8 +28,8 @@
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;
End of Patch.
