… | |
… | |
387 | LOG (llevDebug, "running cleanup handlers.\n"); |
387 | LOG (llevDebug, "running cleanup handlers.\n"); |
388 | INVOKE_GLOBAL (CLEANUP); |
388 | INVOKE_GLOBAL (CLEANUP); |
389 | |
389 | |
390 | LOG (llevDebug, "cleanup done.\n"); |
390 | LOG (llevDebug, "cleanup done.\n"); |
391 | |
391 | |
|
|
392 | log_cleanup (); |
|
|
393 | |
392 | if (make_core) |
394 | if (make_core) |
393 | { |
395 | { |
394 | cleanup_inform (cause, make_core); |
396 | cleanup_inform (cause, make_core); |
395 | cfperl_cleanup (make_core); |
397 | cfperl_cleanup (make_core); |
396 | _exit (1); |
398 | _exit (1); |