summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-12-28 23:15:47 +0000
committerNicholas Clark <nick@ccl4.org>2007-12-28 23:15:47 +0000
commitbb661a585caf67142a296faaea725681ffc2a2ac (patch)
tree3fbfd7c321421d0ff382f0b98af0a371a2c7ba63 /regcomp.c
parent2c96c0d61ce80822b81de2248e48b10f0182d790 (diff)
downloadperl-bb661a585caf67142a296faaea725681ffc2a2ac.tar.gz
Replace 3 uses of RX_PRELEN(r) with plen, which has the same value.
(But isn't a pointer dereference. Or about to become a calculation.) p4raw-id: //depot/perl@32756
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/regcomp.c b/regcomp.c
index 481d3a626e..5c7ee09119 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -4290,7 +4290,7 @@ redo_first_pass:
U16 reganch = (U16)((r->extflags & RXf_PMf_STD_PMMOD) >> 12);
const char *fptr = STD_PAT_MODS; /*"msix"*/
char *p;
- r->wraplen = RX_PRELEN(r) + has_minus + has_p + has_runon
+ r->wraplen = plen + has_minus + has_p + has_runon
+ (sizeof(STD_PAT_MODS) - 1)
+ (sizeof("(?:)") - 1);
@@ -4318,10 +4318,10 @@ redo_first_pass:
}
*p++ = ':';
- Copy(RExC_precomp, p, RX_PRELEN(r), char);
+ Copy(RExC_precomp, p, plen, char);
assert ((r->wrapped - p) < 16);
r->pre_prefix = p - r->wrapped;
- p += RX_PRELEN(r);
+ p += plen;
if (has_runon)
*p++ = '\n';
*p++ = ')';