loncom/lonmaxima - diff

Return to lonmaxima CVS log

Up to [LON-CAPA] / loncom

version 1.35, 2007/11/09 18:51:10	version 1.36, 2007/11/09 18:54:46
Line 134 sub catchexception {	Line 134 sub catchexception {

sub child_announce_death {	sub child_announce_death {
$SIG{USR1} = \&child_announce_death;	$SIG{USR1} = \&child_announce_death;
$extra_children++;	if ($extra_children < $PREFORK*10) {
	$extra_children++;
	}
}	}

# ---------------------------------------------------------------- Main program	# ---------------------------------------------------------------- Main program
Line 299 sub make_new_child {	Line 301 sub make_new_child {
kill('USR1' => $ppid);	kill('USR1' => $ppid);
print $command ("quit();\n");	print $command ("quit();\n");
# tidy up gracefully and finish	# tidy up gracefully and finish
	sleep(15);
$command->soft_close();	$command->soft_close();

# this exit is VERY important, otherwise the child will become	# this exit is VERY important, otherwise the child will become