In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/f24e984e6e928b574a66f581ef40c77a8660fe62?hp=5b05192fea0c4ca81a055932c9efddaa78e85484>

- Log -----------------------------------------------------------------
commit f24e984e6e928b574a66f581ef40c77a8660fe62
Author: James E Keenan <[email protected]>
Date:   Mon Jan 7 20:55:24 2013 -0500

    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
-----------------------------------------------------------------------

Summary of changes:
 t/io/eintr.t |    6 ++++--
 1 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/t/io/eintr.t b/t/io/eintr.t
index 966922b..5804f34 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;

--
Perl5 Master Repository

Reply via email to