diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-16 14:17:29 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-16 14:17:29 +0000 |
| commit | cf5e2701f88a64b33cf0bb988b753623e2db9f65 (patch) | |
| tree | 8c38d154ba9b4568ec37418f7de6698004efcf5c /ext/Socket | |
| parent | 601a910bcc1a5a967a0b43a5e3a75bf0283502d2 (diff) | |
| download | perl-cf5e2701f88a64b33cf0bb988b753623e2db9f65.tar.gz | |
The UDP sockpair failure seems to have magically
disappeared from both UNICOSes.
(One gets "UNEXPECTEDLY SUCCEEDED".)
p4raw-id: //depot/perl@16632
Diffstat (limited to 'ext/Socket')
| -rw-r--r-- | ext/Socket/socketpair.t | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ext/Socket/socketpair.t b/ext/Socket/socketpair.t index c5b72e4d8c..be64dfb70c 100644 --- 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"); |