This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
When using DEBUG_LEAKING_SCALARS_FORK_DUMP it's possible to cause
authorNicholas Clark <nick@ccl4.org>
Sun, 26 Jun 2005 17:59:33 +0000 (17:59 +0000)
committerNicholas Clark <nick@ccl4.org>
Sun, 26 Jun 2005 17:59:33 +0000 (17:59 +0000)
commitbf3573334e260cec7a4095bce2ccbecb4bae4f96
tree72b14dbd73e60b037b2e1a18b9d906d656dd3a41
parent89261a6c6a337d08799db0ac0d518e62472ccf40
When using DEBUG_LEAKING_SCALARS_FORK_DUMP it's possible to cause
indefinite hangs when the debugging child holds open Perl_debug_log,
and it happens to be a file descriptor that is one end of a pipe,
with a process sitting at the other end waitng for EOF.
So close all descriptors in the child *including* Perl_debug_log,
and pass it back in over the control socket if it's needed.

p4raw-id: //depot/perl@24984
perl.c