X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=cop.h;h=a569967dcee252722d1d52131560bbae44dfbbb1;hb=3c10ad8e31f7d77e71c048b1746912f41cb540f0;hp=501faac80edf4ae3264d6605659b9560da9a0aac;hpb=f86702ccfcc3646d7aa30b09ce4f4413be9f99d1;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/cop.h b/cop.h
index 501faac..a569967 100644
--- a/cop.h
+++ b/cop.h
@@ -1,6 +1,6 @@
 /*    cop.h
  *
- *    Copyright (c) 1991-1994, Larry Wall
+ *    Copyright (c) 1991-1997, Larry Wall
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -125,10 +125,10 @@ struct block_loop {
 	  POPLOOP2(); }
 
 #define POPLOOP1(cx)							\
-	cxloop = cx->blk_loop;	/* because DESTROY may clobber *cx */
+	cxloop = cx->blk_loop;	/* because DESTROY may clobber *cx */	\
+	newsp = stack_base + cxloop.resetsp;
 
 #define POPLOOP2()							\
-	newsp = stack_base + cxloop.resetsp;				\
 	SvREFCNT_dec(cxloop.iterlval);					\
 	if (cxloop.itervar) {						\
 	    SvREFCNT_dec(*cxloop.itervar);				\