Change 11595 by jhi@alpha on 2001/08/06 12:51:38
The #11593 wasn't right.
Affected files ...
... //depot/perl/lib/Math/BigInt/t/bigintpm.t#7 edit
Differences ...
==== //depot/perl/lib/Math/BigInt/t/bigintpm.t#7 (xtext) ====
Index: perl/lib/Math/BigInt/t/bigintpm.t
--- perl/lib/Math/BigInt/t/bigintpm.t.~1~ Mon Aug 6 07:00:05 2001
+++ perl/lib/Math/BigInt/t/bigintpm.t Mon Aug 6 07:00:05 2001
@@ -534,8 +534,8 @@
sub ok_inf {
my ($x, $y) = @_;
- $x =~ s/^inf(?:inity)?/$1/i;
- $y =~ s/^inf(?:inity)?/$1/i;
+ $x =~ s/^inf(?:inity)?/Inf/i;
+ $y =~ s/^inf(?:inity)?/Inf/i;
ok($x, $y);
}
End of Patch.
