diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2002-12-10 01:26:44 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-12-14 22:34:25 +0000 |
| commit | 7dafbf5232bace07a044625a5a956b73da3928d5 (patch) | |
| tree | 5042129d851b4706c4c22a7c67de6b3092bc08cb /pp_ctl.c | |
| parent | 0412d5267fa2300f66eb4eb554e2af493b5e5b33 (diff) | |
| download | perl-7dafbf5232bace07a044625a5a956b73da3928d5.tar.gz | |
Proper fix for CvOUTSIDE weak refcounting
Message-ID: <20021210012644.A7843@fdgroup.com>
p4raw-id: //depot/perl@18302
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2700,7 +2700,7 @@ S_doeval(pTHX_ int gimme, OP** startop, CV* outside, U32 seq) cxstack[cxstack_ix].blk_eval.cv = PL_compcv; CvOUTSIDE_SEQ(PL_compcv) = seq; - CvOUTSIDE(PL_compcv) = outside ? (CV*)SvREFCNT_inc(outside) : outside; + CvOUTSIDE(PL_compcv) = (CV*)SvREFCNT_inc(outside); /* set up a scratch pad */ |