fix eval qw(BEGIN{die}) style leaks.
authorDave Mitchell <davem@fdisolutions.com>
Sat, 27 May 2006 21:16:30 +0000 (21:16 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Sat, 27 May 2006 21:16:30 +0000 (21:16 +0000)
commiteb7d7d25d2f780edcbedc124a5bdca0d53ad8687
treefb42e7a0cc102fc83383e6eda687d40254025848
parenta491bdcd42edb4bd84d631c28c304d781a4d4fa2
fix eval qw(BEGIN{die}) style leaks.
death while exdcuting code while parsing meant that the current
parse stack got quiety abandonded, thus leaking a bunch of OPs.
Register a destructor to be called when this happens.

p4raw-id: //depot/perl@28319
perly.c