From: Steve Hay <SteveHay@planit.com>
Date: Wed, 21 Feb 2007 08:40:18 +0000 (+0000)
Subject: Fix Win32 compilation error following #30372
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=def5107868d99ec0d4007de47d727325b581a446;p=p5sagit%2Fp5-mst-13.2.git

Fix Win32 compilation error following #30372

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

diff --git a/regcomp.c b/regcomp.c
index 3fe99c9..7090653 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -8001,8 +8001,8 @@ S_reginsert(pTHX_ RExC_state_t *pRExC_state, U8 op, regnode *opnd, U32 depth)
     register regnode *place;
     const int offset = regarglen[(U8)op];
     const int size = NODE_STEP_REGNODE + offset;
-    PERL_UNUSED_ARG(depth);
     GET_RE_DEBUG_FLAGS_DECL;
+    PERL_UNUSED_ARG(depth);
 /* (PL_regkind[(U8)op] == CURLY ? EXTRA_STEP_2ARGS : 0); */
     DEBUG_PARSE_FMT("inst"," - %s",reg_name[op]);
     if (SIZE_ONLY) {