Change 11900 by jhi@alpha on 2001/09/05 23:22:38
In UNICOS sigaction() sets an extra flag
("the signal has been registered for all the processes in
a multitasking group.")
Affected files ...
... //depot/perl/ext/POSIX/sigaction.t#5 edit
Differences ...
==== //depot/perl/ext/POSIX/sigaction.t#5 (text) ====
Index: perl/ext/POSIX/sigaction.t
--- perl/ext/POSIX/sigaction.t.~1~ Wed Sep 5 17:30:08 2001
+++ perl/ext/POSIX/sigaction.t Wed Sep 5 17:30:08 2001
@@ -54,8 +54,8 @@
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";
}
End of Patch.
