From: Steve Peters <steve@fisharerojo.org>
Date: Thu, 11 Feb 2010 01:41:48 +0000 (-0600)
Subject: Per Jesse, ignoring the skipping the tests form threaded OpenBSD
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9a43387b39cb0e760b618a3cc42bba6c0c90ec31;p=p5sagit%2Fp5-mst-13.2.git

Per Jesse, ignoring the skipping the tests form threaded OpenBSD
builds.  See RT #71504 for the mess that this is avoiding.
---

diff --git a/t/io/errno.t b/t/io/errno.t
index ad4e116..aff3369 100644
--- a/t/io/errno.t
+++ b/t/io/errno.t
@@ -5,6 +5,8 @@
 # http://rt.perl.org/rt3/Ticket/Display.html?id=39060
 
 use strict;
+use Config;
+
 require './test.pl';
 
 plan( tests => 16 );
@@ -25,6 +27,8 @@ for my $perlio ('perlio', 'stdio') {
 SKIP:
     for my $test_in ("test\n", "test") {
 		skip("Guaranteed newline at EOF on VMS", 4) if $^O eq 'VMS' && $test_in eq 'test';
+                skip("[perl #71504] OpenBSD test failures in errno.t with ithreads and perlio", 8)
+                    if $^O eq 'openbsd' && $Config{useithreads} && $perlio eq 'stdio';
 		my $test_in_esc = $test_in;
 		$test_in_esc =~ s/\n/\\n/g;
 		for my $rs_code ('', '$/=undef', '$/=\2', '$/=\1024') {