diff options
author | Larry Wall <lwall@netlabs.com> | 1995-03-15 12:25:31 +1300 |
---|---|---|
committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1995-03-15 12:25:31 +1300 |
commit | b355b4e0798f66a89bbfedc23cbec69c1dff3d33 (patch) | |
tree | f7f7e77b0ac50b0f69816dc5bb93609a7c8cb97d /op.c | |
parent | 748a93069b3d16374a9859d1456065dd3ae11394 (diff) | |
download | perl-b355b4e0798f66a89bbfedc23cbec69c1dff3d33.tar.gz |
Okay, here's your official unofficial closure leak patch
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2676,7 +2676,7 @@ CV* proto; comppadlist = newAV(); AvREAL_off(comppadlist); av_store(comppadlist, 0, SvREFCNT_inc((SV*)protopad_name)); - av_store(comppadlist, 1, SvREFCNT_inc((SV*)comppad)); + av_store(comppadlist, 1, (SV*)comppad); CvPADLIST(cv) = comppadlist; av_extend(comppad, AvFILL(protopad)); curpad = AvARRAY(comppad); |