From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 19 Jun 2003 05:02:22 +0000 (+0000)
Subject: MPE/iX gets serious indigestion on w-packed infinities.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8b571b322f732f3a9cb04d136f3e855372416ec3;p=p5sagit%2Fp5-mst-13.2.git

MPE/iX gets serious indigestion on w-packed infinities.

p4raw-id: //depot/perl@19816
---

diff --git a/t/op/pack.t b/t/op/pack.t
index 53f44c1..31e7b34 100755
--- a/t/op/pack.t
+++ b/t/op/pack.t
@@ -183,6 +183,9 @@ sub list_eq ($$) {
     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 '$@'"