This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Cleanup all scopes before exiting a pseudo-forked process.
authorJan Dubois <jand@activestate.com>
Wed, 2 Dec 2009 09:34:18 +0000 (01:34 -0800)
committerJan Dubois <jand@activestate.com>
Wed, 2 Dec 2009 09:34:18 +0000 (01:34 -0800)
commitadab996997d7ef1b54d382f5ab4304f438cd1dd0
tree3f74834a0f10d742b5ffc51fdaecf20db63e859d
parent781ecc3f4e65a5261736cf5fa8e56b6bea2ff71a
Cleanup all scopes before exiting a pseudo-forked process.

perl_destruct() contains an assertion that the scope stack
is empty.  The remaining scopes are due to fork() being
called from within a BEGIN block.
win32/perlhost.h