This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix a memory leak in sv_sethek(), amending 70b71ec84
authorFuji, Goro <g.psy.va@gmail.com>
Tue, 31 Jul 2012 12:56:11 +0000 (21:56 +0900)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 1 Aug 2012 05:12:05 +0000 (22:12 -0700)
commitc50bda7c602d34fbc8752fc972be6f3050164834
tree529df3e33529719d27a667676024af8e3999a368
parentcfb8f080895a44c06733a04064300a07f255aeb0
fix a memory leak in sv_sethek(), amending 70b71ec84

the following code reproduced this issue on perl 5.16.0:

my $o = bless {};
while (1) {
    for my $r([], $o) {
        ref $r;
    }
}
sv.c