diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-05 23:22:38 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-09-05 23:22:38 +0000 |
| commit | b13b12d159376c20fb496e6765d02b35e0a9b4a5 (patch) | |
| tree | 3b9fd7326c24d7a28634566a50c8b514af6e59b6 /ext | |
| parent | 41f31d6e7ac78419f122694c2a37b63cfe242811 (diff) | |
| download | perl-b13b12d159376c20fb496e6765d02b35e0a9b4a5.tar.gz | |
In UNICOS sigaction() sets an extra flag
("the signal has been registered for all the processes in
a multitasking group.")
p4raw-id: //depot/perl@11900
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/POSIX/sigaction.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/POSIX/sigaction.t b/ext/POSIX/sigaction.t index 70e8e19299..1045db6c3c 100644 --- a/ext/POSIX/sigaction.t +++ b/ext/POSIX/sigaction.t @@ -54,8 +54,8 @@ if($oldaction->{HANDLER} eq '::foo') if($oldaction->{MASK}->ismember(SIGUSR1)) { print "ok 5\n" } else { print "not ok 5\n"} if($oldaction->{FLAGS}) { - if ($^O eq 'linux') { - print "ok 6 # Skip: sigaction() broken in $^O\n"; + if ($^O eq 'linux' || $^O eq 'unicos') { + print "ok 6 # Skip: sigaction() thinks different in $^O\n"; } else { print "not ok 6\n"; } |