summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2016-10-19 21:33:00 +0200
committerYves Orton <demerphq@gmail.com>2016-10-19 21:33:28 +0200
commit04a83e5bd7a0783edd6a771c965154e14a103644 (patch)
treed1ae774c1faefcb57b9cec9f60ca424d8b23c924 /regexec.c
parenta5540cf9741163e5c13e99582ebe3a6ba4f3d3fa (diff)
downloadperl-04a83e5bd7a0783edd6a771c965154e14a103644.tar.gz
mark depth unused except under DEBUGGING
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/regexec.c b/regexec.c
index 8e90d2edcb..47f630e3f2 100644
--- a/regexec.c
+++ b/regexec.c
@@ -283,6 +283,9 @@ S_regcppush(pTHX_ const regexp *rex, I32 parenfloor, U32 maxopenparen, int depth
GET_RE_DEBUG_FLAGS_DECL;
PERL_ARGS_ASSERT_REGCPPUSH;
+#ifndef DEBUGGING
+ PERL_UNUSED_ARG(depth);
+#endif
if (paren_elems_to_push < 0)
Perl_croak(aTHX_ "panic: paren_elems_to_push, %i < 0, maxopenparen: %i parenfloor: %i REGCP_PAREN_ELEMS: %u",
@@ -365,6 +368,9 @@ S_regcppop(pTHX_ regexp *rex, U32 *maxopenparen_p, int depth)
GET_RE_DEBUG_FLAGS_DECL;
PERL_ARGS_ASSERT_REGCPPOP;
+#ifndef DEBUGGING
+ PERL_UNUSED_ARG(depth);
+#endif
/* Pop REGCP_OTHER_ELEMS before the parentheses loop starts. */
i = SSPOPUV;