Test for the right signal should use the constant for that signal.
Steve Peters [Thu, 3 Nov 2005 16:00:12 +0000 (16:00 +0000)]
p4raw-id: //depot/perl@25975

ext/POSIX/t/sigaction.t

index 240110b..813960a 100644 (file)
@@ -198,7 +198,7 @@ SKIP: {
     eval 'use POSIX qw(SA_SIGINFO); SA_SIGINFO';
     skip("no SA_SIGINFO", 1) if $@;
     sub hiphup {
-       is($_[1]->{signo}, 1, "SA_SIGINFO got right signal");
+       is($_[1]->{signo}, SIGHUP, "SA_SIGINFO got right signal");
     }
     my $act = POSIX::SigAction->new('hiphup', 0, SA_SIGINFO);
     sigaction(SIGHUP, $act);