develooper Front page | perl.perl5.porters | Postings from August 2008

ext/POSIX/t/sigaction.t: test 29 fails under ./harness but notunder ./TEST

Thread Next
From:
Bram
Date:
August 10, 2008 04:06
Subject:
ext/POSIX/t/sigaction.t: test 29 fails under ./harness but notunder ./TEST
Message ID:
20080810130551.jjit3h5eogcgcw8s@horde.wizbit.be
Compiled with:
./Configure -Dcc=/opt/gcc/bin_ccache/gcc430 -Ud_getprior -Ud_setprior  
-Ud_setresgid -Ud_setresuid  -Dusedevel -des

Recuded test script:

#!./perl

BEGIN {
         chdir 't' if -d 't';
         unshift @INC, '../lib';
}

use Test::More tests => 2;

use POSIX qw(%SIGRT SIGRTMIN SIGRTMAX);
my $sigrtmin;
my $h = sub { $sigrtmin = 1 };
$SIGRT{SIGRTMIN} = $h;
is($SIGRT{SIGRTMIN}, $h, "handler set & get");
kill 'SIGRTMIN', $$;
is($sigrtmin, 1, "SIGRTMIN handler works");


Output:

./perl TEST -v t.pl
t/t....1..2
ok 1 - handler set & get
ok 2 - SIGRTMIN handler works
ok
All tests successful.
u=0.04  s=0.00  cu=0.11  cs=0.01  scripts=1  tests=2


  ./perl harness -v t.pl
t....
1..2
ok 1 - handler set & get
not ok 2 - SIGRTMIN handler works

#   Failed test 'SIGRTMIN handler works'
#   at t.pl line 16.
#          got: undef
#     expected: '1'
# Looks like you failed 1 test of 2.
  Dubious, test returned 1 (wstat 256, 0x100)
  Failed 1/2 subtests

Test Summary Report
-------------------
t (Wstat: 256 Tests: 2 Failed: 1)
   Failed test:  2
   Non-zero exit status: 1
Files=1, Tests=2,  0 wallclock secs ( 0.02 usr  0.00 sys +  0.10 cusr   
0.02 csys =  0.14 CPU)
Result: FAIL
Failed 1/1 test programs. 1/2 subtests failed.


Any ideas?

Kind regards,

Bram



Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About