Change 33075 by [EMAIL PROTECTED] on 2008/01/26 15:17:09
Restore the else block accidently eaten by change 33074.
Affected files ...
... //depot/perl/cop.h#171 edit
Differences ...
==== //depot/perl/cop.h#171 (text) ====
Index: perl/cop.h
--- perl/cop.h#170~33074~ 2008-01-26 07:14:25.000000000 -0800
+++ perl/cop.h 2008-01-26 07:17:09.000000000 -0800
@@ -520,6 +520,9 @@
sv_2mortal(*s_v_p); \
*s_v_p = cx->blk_loop.itersave; \
} \
+ else { \
+ SvREFCNT_dec(cx->blk_loop.itersave); \
+ } \
} \
if (CxTYPE(cx) == CXt_LOOP_FOR) \
SvREFCNT_dec(cx->blk_loop.state_u.ary.ary);
End of Patch.
