This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
ext/POSIX/t/sigaction.t: Skip uid and pid tests on GNU/Hurd
authorDominic Hargreaves <dom@earth.li>
Sat, 28 May 2016 14:51:53 +0000 (15:51 +0100)
committerDominic Hargreaves <dom@earth.li>
Sat, 28 May 2016 14:51:53 +0000 (15:51 +0100)
SA_SIGINFO does not include uid and pid on GNU/Hurd, and this is
unlikely to change in the near future, so skip these tests.

Thanks to Samuel Thibault for the report.

Bug-Debian: https://bugs.debian.org/825016

ext/POSIX/lib/POSIX.pm
ext/POSIX/t/sigaction.t

index 6231bcb..1bf8e62 100644 (file)
@@ -4,7 +4,7 @@ use warnings;
 
 our ($AUTOLOAD, %SIGRT);
 
-our $VERSION = '1.69';
+our $VERSION = '1.70';
 
 require XSLoader;
 
index d19341c..bce3b76 100644 (file)
@@ -202,7 +202,9 @@ SKIP: {
     $skip{pid}{$^O} = $skip{uid}{$^O} = "not set for kill()"
         if (($^O.$Config{osvers}) =~ /^darwin[0-8]\./
             ||
-            ($^O.$Config{osvers}) =~ /^openbsd[0-5]\./);
+            ($^O.$Config{osvers}) =~ /^openbsd[0-5]\./
+            ||
+            ($^O eq 'gnu'));
     my $tests = keys %{{ %siginfo, %opt_val }};
     eval 'use POSIX qw(SA_SIGINFO); SA_SIGINFO';
     skip("no SA_SIGINFO", $tests) if $@;