From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 6 Apr 2008 21:53:57 +0000 (+0000)
Subject: Change 33653 (inevitably) missed one cop_label, because I mistook it
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b1cf8b36002caf0ed4905946652ecfd99208858c;p=p5sagit%2Fp5-mst-13.2.git

Change 33653 (inevitably) missed one cop_label, because I mistook it
for part of some other context-stack related struct.

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

diff --git a/cop.h b/cop.h
index 90f96a1..d1e46da 100644
--- a/cop.h
+++ b/cop.h
@@ -476,7 +476,7 @@ struct block_loop {
 #  define CX_ITERDATA_SET(cx,ivar,o)					\
 	cx->blk_loop.itervar = (SV**)(ivar);
 #endif
-#define CxLABEL(c)	(0 + (c)->blk_oldcop->cop_label)
+#define CxLABEL(c)	(0 + CopLABEL((c)->blk_oldcop))
 #define CxHASARGS(c)	(((c)->cx_type & CXp_HASARGS) == CXp_HASARGS)
 #define CxLVAL(c)	(0 + (c)->blk_u16)