From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 26 Jan 2008 15:17:09 +0000 (+0000)
Subject: Restore the else block accidently eaten by change 33074.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9a98d8a1ee5dd7f1caa95f2ec5ab0341e0b4f8d1;p=p5sagit%2Fp5-mst-13.2.git

Restore the else block accidently eaten by change 33074.

p4raw-id: //depot/perl@33075
---

diff --git a/cop.h b/cop.h
index 48f9d5b..359abd6 100644
--- a/cop.h
+++ b/cop.h
@@ -520,6 +520,9 @@ struct block_loop {
 		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);