This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix assertion failures with anon subs
authorFather Chrysostomos <sprout@cpan.org>
Tue, 13 Nov 2012 22:52:09 +0000 (14:52 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 13 Nov 2012 22:54:21 +0000 (14:54 -0800)
commit4d2dfd152adb9e89694e8af7f0ae810bda03128b
tree09b1ccf5634a247c263ad6ea8d51831ca312fd84
parente1ff3a882ff0ab24ec23467b3cd86bf1a249d61a
Fix assertion failures with anon subs

In commit 9ffcdca1f50, I did not take into account that the newATTRSUB’s
caller makes sure that the CV is freed if it is an anonymous sub.  So I
only needed to free the sub explicitly after a syntax error for a named
sub.

By returning 0 for anonymous subs as well, I ended up causing assertion
failures.  Why I wasn’t getting them before I don’t know, as I was using
a debugging build.
op.c
t/op/svleak.t