The UDP sockpair failure seems to have magically

disappeared from both UNICOSes.
(One gets "UNEXPECTEDLY SUCCEEDED".)

p4raw-id: //depot/perl@16632

diff --git a/ext/Socket/socketpair.t b/ext/Socket/socketpair.t
index c5b72e4..be64dfb 100644 (file)
--- a/ext/Socket/socketpair.t
+++ b/ext/Socket/socketpair.t
@@ -117,8 +117,7 @@ ok (shutdown(LEFT, SHUT_WR), "shutdown left for writing");
 {
   local $SIG{ALRM} = sub { warn "EOF on right took over 3 seconds" };
   local $TODO = "Known problems with unix sockets on $^O"
-      if $^O eq 'hpux'   || $^O eq 'unicosmk' ||
-        $^O eq 'unicos' || $^O eq 'super-ux';
+      if $^O eq 'hpux'   || $^O eq 'super-ux';
   alarm 3;
   $! = 0;
   ok (eof RIGHT, "right is at EOF");