perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Eric Cholet <cho...@logilune.com>
Subject Re: t/perl/signals failure
Date Wed, 05 Jan 2005 16:46:25 GMT
Le 5 janv. 05, à 17:41, Eric Cholet a écrit :

> Le 5 janv. 05, à 17:20, Stas Bekman a écrit :
>
>> As I've followed up, you didn't miss anything. As I'm not on your 
>> platform all I can suggest is to dig into the code, i.e.
>> t/response/TestPerl/signals.pm
>
> Thanks, here's what I am seeing in that code:
>
>     if (!$static) {
>         local $ENV{PERL_SIGNALS} = "unsafe";
>
>         eval {
>             local $SIG{ALRM} = sub { die "alarm" };
>             alarm 2;
>             run_for_5_sec();
>             alarm 0;
>         };
>         ok t_cmp $@, qr/alarm/, "SIGALRM / unsafe %SIG";
>     }
>
> run_for_5_sec() runs for about 2 seconds, and then nothing happens. In
> the signal handler I replaced die with warn, but the warn doesn't 
> happen.

I forgot to mention that after those 2 seconds, I see this is the error 
log:

[Wed Jan 05 17:36:54 2005] [notice] child pid 29676 exit signal Alarm 
clock (14)

--
Eric Cholet


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Mime
View raw message