Return to run.pm CVS log | Up to [LON-CAPA] / loncom / xml |
version 1.57, 2006/02/20 23:52:20 | version 1.58, 2006/03/16 15:47:37 |
---|---|
Line 78 sub evaluate { | Line 78 sub evaluate { |
my $result = ''; | my $result = ''; |
$@=''; | $@=''; |
$Apache::run::timeout=0; | $Apache::run::timeout=0; |
$main::SIG{'ALRM'} = sub { | local $main::SIG{'ALRM'} = sub { |
$Apache::run::timeout=1; | $Apache::run::timeout=1; |
die("timeout"); | die("timeout"); |
}; | }; |
Line 116 sub run { | Line 116 sub run { |
my @result; | my @result; |
$@=''; | $@=''; |
$Apache::run::timeout=0; | $Apache::run::timeout=0; |
$main::SIG{'ALRM'} = sub { | local $main::SIG{'ALRM'} = sub { |
$Apache::run::timeout=1; | $Apache::run::timeout=1; |
die("timeout"); | die("timeout"); |
}; | }; |