X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp.h;h=3893c10d9da756af72e5305ee249bc13d4fed230;hb=5538b230ca39261209d43cdc40371b2d9b9dfa11;hp=8986db95df7fe22aed77833eb642dafb96ddeb73;hpb=c5661c80adf757c3cf464bf5f538fe5082b73584;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/pp.h b/pp.h
index 8986db9..3893c10 100644
--- a/pp.h
+++ b/pp.h
@@ -385,8 +385,8 @@ See C<PUSHu>.
    changed SV* ref to SV* tmpRef */
 #define RvDEEPCP(rv) STMT_START { SV* tmpRef=SvRV(rv);      \
   if (SvREFCNT(tmpRef)>1) {                 \
+    SvRV(rv)=AMG_CALLun(rv,copy);	\
     SvREFCNT_dec(tmpRef);                   \
-    SvRV(rv)=AMG_CALLun(rv,copy);        \
   } } STMT_END
 
 /*