ext/IO/lib/IO/t/io_unix.t

Message-Id: <200203260457.XAA19233@mailhub2.stratus.com>

p4raw-id: //depot/perl@15509

diff --git a/ext/IO/lib/IO/t/io_unix.t b/ext/IO/lib/IO/t/io_unix.t
index e8ce473..60520d1 100644 (file)
--- a/ext/IO/lib/IO/t/io_unix.t
+++ b/ext/IO/lib/IO/t/io_unix.t
@@ -27,7 +27,7 @@ BEGIN {
            eval {IO::Socket::pack_sockaddr_un('/tmp/foo') || 1}
              or $@ !~ /not implemented/ or
                $reason = 'compiled without TCP/IP stack v4';
-       } elsif ($^O =~ m/^(?:qnx|nto)$/ ) {
+       } elsif ($^O =~ m/^(?:qnx|nto|vos)$/ ) {
            $reason = 'Not implemented';
        }
        if ($reason) {