diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-11 14:42:06 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-11 14:42:06 +0000 |
| commit | 0b27c29c2324971904f404674827f716bba50b8e (patch) | |
| tree | 3e0a217822146f53e1d52cd4c7e9041ef1e0ef13 /ext/Socket | |
| parent | 186cab3869deb7b5b39629500e7a1f81c2ef55c0 (diff) | |
| download | perl-0b27c29c2324971904f404674827f716bba50b8e.tar.gz | |
Also NEC SUPER-UX has buggy sockpair().
p4raw-id: //depot/perl@15862
Diffstat (limited to 'ext/Socket')
| -rw-r--r-- | ext/Socket/socketpair.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Socket/socketpair.t b/ext/Socket/socketpair.t index 79dfb63fb4..09ee0670a0 100644 --- a/ext/Socket/socketpair.t +++ b/ext/Socket/socketpair.t @@ -117,7 +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'; + if $^O eq 'hpux' || $^O eq 'unicosmk' || $^O eq 'super-ux'; alarm 3; $! = 0; ok (eof RIGHT, "right is at EOF"); |