In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/04a83e5bd7a0783edd6a771c965154e14a103644?hp=a5540cf9741163e5c13e99582ebe3a6ba4f3d3fa>
- Log ----------------------------------------------------------------- commit 04a83e5bd7a0783edd6a771c965154e14a103644 Author: Yves Orton <[email protected]> Date: Wed Oct 19 21:33:00 2016 +0200 mark depth unused except under DEBUGGING ----------------------------------------------------------------------- Summary of changes: regexec.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/regexec.c b/regexec.c index 8e90d2e..47f630e 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; -- Perl5 Master Repository
