regexec.c - convert UNWIND_PAREN() into an inline static function

This makes it easier to debug, and type checks parameters and the
like. It does make it somewhat slower in debug mode, but so what.

1 files changed, 5 insertions, 0 deletions

diff --git a/proto.h b/proto.h
index 87ae9bde30..f58ae1277c 100644
--- a/proto.h
+++ b/proto.h
@@ -8915,6 +8915,11 @@ S_foldEQ_latin1_s2_folded(pTHX_ const char *a, const char *b, I32 len);
 #   define PERL_ARGS_ASSERT_FOLDEQ_LATIN1_S2_FOLDED \
         assert(a); assert(b)
 
+PERL_STATIC_INLINE void
+S_unwind_paren(pTHX_ regexp *rex, U32 lp, U32 lcp comma_pDEPTH);
+#   define PERL_ARGS_ASSERT_UNWIND_PAREN        \
+        assert(rex)
+
 # endif /* !defined(PERL_NO_INLINE_FUNCTIONS) */
 #endif /* defined(PERL_IN_REGEXEC_C) */
 #if defined(PERL_IN_REGEX_ENGINE)