From: Steve Hay <SteveHay@planit.com>
Date: Wed, 21 Jun 2006 08:07:21 +0000 (+0000)
Subject: Fix code before declaration error introduced by #28405
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=76e843627455c4ad0defcc8bd300dbbccba5b598;p=p5sagit%2Fp5-mst-13.2.git

Fix code before declaration error introduced by #28405

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

diff --git a/regcomp.c b/regcomp.c
index a0acc09..9faa37b 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5177,14 +5177,14 @@ S_regclass(pTHX_ RExC_state_t *pRExC_state, U32 depth)
 #ifdef EBCDIC
     UV literal_endpoint = 0;
 #endif
-#ifndef DEBUGGING
-    PERL_UNUSED_ARG(depth);
-#endif
     UV stored = 0;  /* number of chars stored in the class */
 
     regnode * const orig_emit = RExC_emit; /* Save the original RExC_emit in
         case we need to change the emitted regop to an EXACT. */
     const char * orig_parse = RExC_parse;
+#ifndef DEBUGGING
+    PERL_UNUSED_ARG(depth);
+#endif
     GET_RE_DEBUG_FLAGS_DECL;
     DEBUG_PARSE("clas");