summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJames E Keenan <jkeenan@cpan.org>2013-01-07 20:55:24 -0500
committerJames E Keenan <jkeenan@cpan.org>2013-01-18 19:04:40 -0500
commitf24e984e6e928b574a66f581ef40c77a8660fe62 (patch)
tree79b80893eb052e578a3273c485938f81e0dbdfea
parent5b05192fea0c4ca81a055932c9efddaa78e85484 (diff)
downloadperl-f24e984e6e928b574a66f581ef40c77a8660fe62.tar.gz
Skip t/io/eintr.t on older Darwins.
Identify the OS version by capturing the first two parts of the M.m.p version number. For RT #116262
-rw-r--r--t/io/eintr.t6
1 files changed, 4 insertions, 2 deletions
diff --git a/t/io/eintr.t b/t/io/eintr.t
index 966922bbe7..5804f34cb2 100644
--- a/t/io/eintr.t
+++ b/t/io/eintr.t
@@ -49,9 +49,11 @@ if (exists $ENV{PERLIO} && $ENV{PERLIO} =~ /stdio/ ) {
# Also skip on release builds, to avoid other possibly problematic
# platforms
+my ($osmajmin) = $Config{osvers} =~ /^(\d+\.\d+)/;
if ($^O eq 'VMS' || $^O eq 'MSWin32' || $^O eq 'cygwin' || $^O =~ /freebsd/ ||
- ($^O eq 'solaris' && $Config{osvers} eq '2.8')
- || ((int($]*1000) & 1) == 0)
+ ($^O eq 'solaris' && $Config{osvers} eq '2.8') ||
+ ($^O eq 'darwin' && $osmajmin < 9) ||
+ ((int($]*1000) & 1) == 0)
) {
skip_all('various portability issues');
exit 0;