diff options
| author | Yves Orton <demerphq@gmail.com> | 2023-03-18 12:22:34 +0100 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2023-03-19 05:27:01 +0800 |
| commit | 4d51d5bc07c99bc5811ccbae1503b27d813e0743 (patch) | |
| tree | ff38500149226af0ce009e6acd0e75653ec24656 /regexec.c | |
| parent | 0d5b46c9e4cecc121ba79df380cde0ae037d16f7 (diff) | |
| download | perl-4d51d5bc07c99bc5811ccbae1503b27d813e0743.tar.gz | |
regen/embed.pl - change _aDEPTH and _pDEPTH to not have a leading underbar
The leading underbar is reserved by C.
These defines are debugging only "recursion" depth related counters
injected into the function macro wrappers when a function is marked as
'W', much the same way that aTHX_ and pTHX_ are when building under
threaded builds. The functions are expected to incremented the depth
parameter themselves. Note that "recursion" is quoted above because in
practice currently they are only used by the regex engine when recursing
virtually, and they do not relate to true C stack related recursion.
(But they could be used for tracking C level recursion under debugging
if someone needed it.)
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -225,7 +225,7 @@ static regmatch_state * S_push_slab(pTHX); * are needed for the regexp context stack bookkeeping. */ STATIC CHECKPOINT -S_regcppush(pTHX_ const regexp *rex, I32 parenfloor, U32 maxopenparen _pDEPTH) +S_regcppush(pTHX_ const regexp *rex, I32 parenfloor, U32 maxopenparen comma_pDEPTH) { const int retval = PL_savestack_ix; /* Number of bytes about to be stored in the stack */ @@ -382,7 +382,7 @@ STMT_START { \ STATIC void -S_regcppop(pTHX_ regexp *rex, U32 *maxopenparen_p _pDEPTH) +S_regcppop(pTHX_ regexp *rex, U32 *maxopenparen_p comma_pDEPTH) { UV i; U32 paren; @@ -480,7 +480,7 @@ S_regcppop(pTHX_ regexp *rex, U32 *maxopenparen_p _pDEPTH) * but without popping the stack */ STATIC void -S_regcp_restore(pTHX_ regexp *rex, I32 ix, U32 *maxopenparen_p _pDEPTH) +S_regcp_restore(pTHX_ regexp *rex, I32 ix, U32 *maxopenparen_p comma_pDEPTH) { I32 tmpix = PL_savestack_ix; PERL_ARGS_ASSERT_REGCP_RESTORE; @@ -10194,7 +10194,7 @@ NULL */ STATIC I32 S_regrepeat(pTHX_ regexp *prog, char **startposp, const regnode *p, - char * loceol, regmatch_info *const reginfo, I32 max _pDEPTH) + char * loceol, regmatch_info *const reginfo, I32 max comma_pDEPTH) { char *scan; /* Pointer to current position in target string */ I32 c; |