https://bugzilla.redhat.com/show_bug.cgi?id=858966 Bug ID: 858966 QA Contact: extras-qa@xxxxxxxxxxxxxxxxx Severity: unspecified URL: https://rt.perl.org/rt3//Public/Bug/Display.html?id=11 4764 Version: 18 Priority: unspecified CC: cweyl@xxxxxxxxxxxxxxx, iarnell@xxxxxxxxx, jplesnik@xxxxxxxxxx, kasal@xxxxxx, lkundrak@xxxxx, mmaslano@xxxxxxxxxx, perl-devel@xxxxxxxxxxxxxxxxxxxxxxx, ppisar@xxxxxxxxxx, psabata@xxxxxxxxxx, rc040203@xxxxxxxxxx, tcallawa@xxxxxxxxxx Assignee: mmaslano@xxxxxxxxxx Summary: perl-5.16: my variables with attributes leak Regression: --- Story Points: --- Classification: Fedora OS: Unspecified Reporter: ppisar@xxxxxxxxxx Type: Bug Documentation: --- Hardware: Unspecified Mount Type: --- Status: ASSIGNED Component: perl Product: Fedora This code consumes more and more memory: $ perl -e 'while (1) { eval qq{my $x : shared}; }' perl-5.16 (F≥18) is affected. Fixes by upstream commit: commit 9fa29fa7929b4167c5491b792c5cc7e4365a2839 Author: Father Chrysostomos <sprout@xxxxxxxx> Date: Wed Sep 19 21:53:51 2012 -0700 [perl #114764] Stop my vars with attrs from leaking S_apply_attrs was creating a SV containing a stash name, that was later to be put in a const op, which would take care of freeing it. But it didn’t free it for a my variable, because the branch where that const op was created didn’t apply. So move the creation of that SV inside the branch that uses it, otherwise it leaks. This leak was the result of commit 95f0a2f1ffc6. -- You are receiving this mail because: You are on the CC list for the bug. -- Fedora Extras Perl SIG http://www.fedoraproject.org/wiki/Extras/SIGs/Perl perl-devel mailing list perl-devel@xxxxxxxxxxxxxxxxxxxxxxx https://admin.fedoraproject.org/mailman/listinfo/perl-devel
