summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2022-07-30 19:06:34 +0200
committerYves Orton <demerphq@gmail.com>2022-08-03 11:07:09 +0200
commit366fc8089b728e2f722dab2da854445f0a5e1d69 (patch)
tree59ce5765052cef81584a2d48c0ae428482ab80e9 /regcomp.c
parent3bfb2e3bfb2415adc56f1e24f6a3b96d49b575b0 (diff)
downloadperl-366fc8089b728e2f722dab2da854445f0a5e1d69.tar.gz
regex engine - Rename PL_reg_off_by_arg to PL_regnode_off_by_arg
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/regcomp.c b/regcomp.c
index 69ce73086a..8ddb95322f 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -4396,7 +4396,7 @@ S_join_exact(pTHX_ RExC_state_t *pRExC_state, regnode *scan,
#ifdef EXPERIMENTAL_INPLACESCAN
if (flags && !NEXT_OFF(n)) {
DEBUG_PEEP("atch", val, depth, 0);
- if (PL_reg_off_by_arg[OP(n)]) {
+ if (PL_regnode_off_by_arg[OP(n)]) {
ARG_SET(n, val - n);
}
else {
@@ -4656,11 +4656,11 @@ S_rck_elide_nothing(pTHX_ regnode *node)
PERL_ARGS_ASSERT_RCK_ELIDE_NOTHING;
if (OP(node) != CURLYX) {
- const int max = (PL_reg_off_by_arg[OP(node)]
+ const int max = (PL_regnode_off_by_arg[OP(node)]
? I32_MAX
/* I32 may be smaller than U16 on CRAYs! */
: (I32_MAX < U16_MAX ? I32_MAX : U16_MAX));
- int off = (PL_reg_off_by_arg[OP(node)] ? ARG(node) : NEXT_OFF(node));
+ int off = (PL_regnode_off_by_arg[OP(node)] ? ARG(node) : NEXT_OFF(node));
int noff;
regnode *n = node;
@@ -4675,7 +4675,7 @@ S_rck_elide_nothing(pTHX_ regnode *node)
) {
off += noff;
}
- if (PL_reg_off_by_arg[OP(node)])
+ if (PL_regnode_off_by_arg[OP(node)])
ARG(node) = off;
else
NEXT_OFF(node) = off;
@@ -5908,7 +5908,7 @@ S_study_chunk(pTHX_
while ( nxt1 && (OP(nxt1) != WHILEM)) {
regnode *nnxt = regnext(nxt1);
if (nnxt == nxt) {
- if (PL_reg_off_by_arg[OP(nxt1)])
+ if (PL_regnode_off_by_arg[OP(nxt1)])
ARG_SET(nxt1, nxt2 - nxt1);
else if (nxt2 - nxt1 < U16_MAX)
NEXT_OFF(nxt1) = nxt2 - nxt1;
@@ -21484,7 +21484,7 @@ S_regtail(pTHX_ RExC_state_t * pRExC_state,
/* Populate this node's next pointer */
assert(val >= scan);
- if (PL_reg_off_by_arg[OP(REGNODE_p(scan))]) {
+ if (PL_regnode_off_by_arg[OP(REGNODE_p(scan))]) {
assert((UV) (val - scan) <= U32_MAX);
ARG_SET(REGNODE_p(scan), val - scan);
}
@@ -21583,7 +21583,7 @@ S_regtail_study(pTHX_ RExC_state_t *pRExC_state, regnode_offset p,
(IV)(val - scan)
);
});
- if (PL_reg_off_by_arg[OP(REGNODE_p(scan))]) {
+ if (PL_regnode_off_by_arg[OP(REGNODE_p(scan))]) {
assert((UV) (val - scan) <= U32_MAX);
ARG_SET(REGNODE_p(scan), val - scan);
}
@@ -22958,7 +22958,7 @@ Perl_regnext(pTHX_ regnode *p)
(int)OP(p), (int)REGNODE_MAX);
}
- offset = (PL_reg_off_by_arg[OP(p)] ? ARG(p) : NEXT_OFF(p));
+ offset = (PL_regnode_off_by_arg[OP(p)] ? ARG(p) : NEXT_OFF(p));
if (offset == 0)
return(NULL);