summaryrefslogtreecommitdiff
path: root/ext/POSIX
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2005-07-21 21:33:22 +0300
committerH.Merijn Brand <h.m.brand@xs4all.nl>2005-07-21 15:41:39 +0000
commit79dec0f47660bf63141eb6171dd4c2d4053422af (patch)
treee2395c7fe06d526bfdec489bcc17e2fd6c468088 /ext/POSIX
parentb40906a9a3a195cf3ea96490cc4a691baeca3abe (diff)
downloadperl-79dec0f47660bf63141eb6171dd4c2d4053422af.tar.gz
Re: [PATCH] support POSIX SA_SIGINFO
Message-ID: <42DFC042.1090201@gmail.com> p4raw-id: //depot/perl@25207
Diffstat (limited to 'ext/POSIX')
-rw-r--r--ext/POSIX/POSIX.pod4
-rw-r--r--ext/POSIX/t/sigaction.t2
2 files changed, 5 insertions, 1 deletions
diff --git a/ext/POSIX/POSIX.pod b/ext/POSIX/POSIX.pod
index e7166a643d..78557dab56 100644
--- a/ext/POSIX/POSIX.pod
+++ b/ext/POSIX/POSIX.pod
@@ -1140,6 +1140,10 @@ semantics, as defined by POSIX/SUSv3:
code if this is zero or less, the signal was sent by
a user process and the uid and pid make sense,
otherwise the signal was sent by the kernel
+
+The following are also defined by POSIX/SUSv3, but unfortunately
+not very widely implemented:
+
pid the process id generating the signal
uid the uid of the process id generating the signal
status exit value or signal for SIGCHLD
diff --git a/ext/POSIX/t/sigaction.t b/ext/POSIX/t/sigaction.t
index 6de6cfbecd..d0ff59559c 100644
--- a/ext/POSIX/t/sigaction.t
+++ b/ext/POSIX/t/sigaction.t
@@ -195,7 +195,7 @@ SKIP: {
eval 'use POSIX qw(SA_SIGINFO); SA_SIGINFO';
skip("no SA_SIGINFO", 1) if $@;
sub hiphup {
- is($_[1]->{pid}, $$, "SA_SIGINFO got right pid");
+ is($_[1]->{signo}, 1, "SA_SIGINFO got right signal");
}
my $act = POSIX::SigAction->new('hiphup', 0, SA_SIGINFO);
sigaction(SIGHUP, $act);