Change 19816 by [EMAIL PROTECTED] on 2003/06/19 05:02:22
MPE/iX gets serious indigestion on w-packed infinities.
Affected files ...
... //depot/perl/t/op/pack.t#82 edit
Differences ...
==== //depot/perl/t/op/pack.t#82 (xtext) ====
Index: perl/t/op/pack.t
--- perl/t/op/pack.t#81~19714~ Sun Jun 8 21:29:04 2003
+++ perl/t/op/pack.t Wed Jun 18 22:02:22 2003
@@ -183,6 +183,9 @@
skip "-- the IEEE infinity model is unavailable in this configuration."
if (($^O eq 'VMS') && !defined($Config{useieee}));
+ skip "-- MPE/iX has serious fp indigestionf on w-packed infinities"
+ if (($^O eq 'mpeix'));
+
my $inf = eval '2**10000';
skip "Couldn't generate infinity - got error '$@'"
End of Patch.