diff options
author | Yves Orton <demerphq@gmail.com> | 2016-10-19 21:33:00 +0200 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2016-10-19 21:33:28 +0200 |
commit | 04a83e5bd7a0783edd6a771c965154e14a103644 (patch) | |
tree | d1ae774c1faefcb57b9cec9f60ca424d8b23c924 /regexec.c | |
parent | a5540cf9741163e5c13e99582ebe3a6ba4f3d3fa (diff) | |
download | perl-04a83e5bd7a0783edd6a771c965154e14a103644.tar.gz |
mark depth unused except under DEBUGGING
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -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; |