| … | |
… | |
| 53 | BEGIN { |
53 | BEGIN { |
| 54 | # This safe compartment is used to read the large macro files such as |
54 | # This safe compartment is used to read the large macro files such as |
| 55 | # PG.pl, PGbasicmacros.pl and PGanswermacros and cache the results so that |
55 | # PG.pl, PGbasicmacros.pl and PGanswermacros and cache the results so that |
| 56 | # future calls have preloaded versions of these large files. This saves a |
56 | # future calls have preloaded versions of these large files. This saves a |
| 57 | # significant amount of time. |
57 | # significant amount of time. |
| 58 | $WeBWorK::PG::Local::safeCache = new Safe; |
58 | $WeBWorK::PG::Local::safeCache = new WWSafe; |
| 59 | } |
59 | } |
| 60 | |
60 | |
| 61 | sub alarm_handler { |
61 | sub alarm_handler { |
| 62 | my $msg = "Timeout after processing this problem for ". TIMEOUT. " seconds. Check for infinite loops in problem source.\n"; |
62 | my $msg = "Timeout after processing this problem for ". TIMEOUT. " seconds. Check for infinite loops in problem source.\n"; |
| 63 | warn $msg; |
63 | warn $msg; |