summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2020-03-10 13:05:55 -0600
committerKarl Williamson <khw@cpan.org>2020-03-11 16:33:06 -0600
commitfd8ce3da25472276b0923b6f9a6c685b77d63b09 (patch)
tree836b97a1c893aa4f18a4b8d9cfa98e6e41a8e0b4 /regexec.c
parent2339a2013e49d6d22569f315a3add4ac4dd6649d (diff)
downloadperl-fd8ce3da25472276b0923b6f9a6c685b77d63b09.tar.gz
regexec.c: Clean up debug call
The code this replaces relies on the internal structure of a macro, which can change and break things. This commit changes to use a more straight forward way of accomplishing the same thing.
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c8
1 files changed, 5 insertions, 3 deletions
diff --git a/regexec.c b/regexec.c
index 925a04816b..2f993a3bc1 100644
--- a/regexec.c
+++ b/regexec.c
@@ -9212,8 +9212,10 @@ NULL
/* push a new regex state, then continue at scan */
{
regmatch_state *newst;
+ DECLARE_AND_GET_RE_DEBUG_FLAGS;
- DEBUG_STACK_r({
+ DEBUG_r( /* DEBUG_STACK_r */
+ if (DEBUG_v_TEST || RE_DEBUG_FLAG(RE_DEBUG_EXTRA_STACK)) {
regmatch_state *cur = st;
regmatch_state *curyes = yes_state;
U32 i;
@@ -9232,9 +9234,9 @@ NULL
if (curyes == cur)
curyes = cur->u.yes.prev_yes_state;
}
- } else
+ } else {
DEBUG_STATE_pp("push")
- );
+ });
depth++;
st->locinput = locinput;
st->loceol = loceol;