This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
OpenBSD does not do si_uid with sigaction().
authorJarkko Hietaniemi <jhi@iki.fi>
Thu, 4 Feb 2016 12:38:56 +0000 (07:38 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Thu, 4 Feb 2016 12:38:56 +0000 (07:38 -0500)
Seen in OpenBSD 4.8, but found no mention of this working in 5.x.

ext/POSIX/t/sigaction.t

index f208da3..d19341c 100644 (file)
@@ -200,7 +200,9 @@ SKIP: {
     my %always = map +($_ => 1), qw(signo code);
     my %skip = ( code => { darwin => "not set to SI_USER for kill()" } );
     $skip{pid}{$^O} = $skip{uid}{$^O} = "not set for kill()"
-        if ($^O.$Config{osvers}) =~ /^darwin[0-8]\./;
+        if (($^O.$Config{osvers}) =~ /^darwin[0-8]\./
+            ||
+            ($^O.$Config{osvers}) =~ /^openbsd[0-5]\./);
     my $tests = keys %{{ %siginfo, %opt_val }};
     eval 'use POSIX qw(SA_SIGINFO); SA_SIGINFO';
     skip("no SA_SIGINFO", $tests) if $@;