summaryrefslogtreecommitdiff
path: root/dist
diff options
context:
space:
mode:
authorTony Cook <tony@develop-help.com>2013-05-15 15:56:13 -0400
committerRicardo Signes <rjbs@cpan.org>2013-05-15 17:07:12 -0400
commit610996fda2dae66f57562c2ae9ab5c005b8e0c69 (patch)
tree1d45ac06296a4ef70e39ee1588e5864e0588aa86 /dist
parent5cd341ec74739edf115fb2955ab004b1116c64c0 (diff)
downloadperl-610996fda2dae66f57562c2ae9ab5c005b8e0c69.tar.gz
Address [perl #117999] for now by skipping known bad test on AIX
Diffstat (limited to 'dist')
-rw-r--r--dist/IO/t/cachepropagate-udp.t2
-rw-r--r--dist/IO/t/cachepropagate-unix.t2
2 files changed, 4 insertions, 0 deletions
diff --git a/dist/IO/t/cachepropagate-udp.t b/dist/IO/t/cachepropagate-udp.t
index 6cf1132eee..6568b2d592 100644
--- a/dist/IO/t/cachepropagate-udp.t
+++ b/dist/IO/t/cachepropagate-udp.t
@@ -31,6 +31,8 @@ SKIP: {
is($new->protocol(), $p, 'protocol match');
}
SKIP: {
+ skip "AIX: getsockopt(SO_TYPE) is badly broken on UDP/UNIX sockets", 1
+ if $^O eq "aix";
skip "no Socket::SO_TYPE", 1 if !defined(eval { Socket::SO_TYPE });
skip "SO_TYPE defined but not implemented", 1
if !defined $new->sockopt(Socket::SO_TYPE);
diff --git a/dist/IO/t/cachepropagate-unix.t b/dist/IO/t/cachepropagate-unix.t
index 228083a783..e3e438ea1c 100644
--- a/dist/IO/t/cachepropagate-unix.t
+++ b/dist/IO/t/cachepropagate-unix.t
@@ -91,6 +91,8 @@ SKIP: {
is($new->protocol(), $p, 'protocol match');
}
SKIP: {
+ skip "AIX: getsockopt(SO_TYPE) is badly broken on UDP/UNIX sockets", 1
+ if $^O eq "aix";
skip "no Socket::SO_TYPE", 1 if !defined(eval { Socket::SO_TYPE });
skip "SO_TYPE defined but not implemented", 1
if !defined $new->sockopt(Socket::SO_TYPE);