Change 32756: Replace 3 uses of RX_PRELEN(r) with plen, which has the same value.

[Nicholas Clark]

Change 32756 by [EMAIL PROTECTED] on 2007/12/28 23:15:47

        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.)

Affected files ...

... //depot/perl/regcomp.c#625 edit

Differences ...

==== //depot/perl/regcomp.c#625 (text) ====
Index: perl/regcomp.c
--- perl/regcomp.c#624~32755~   2007-12-28 14:19:00.000000000 -0800
+++ perl/regcomp.c      2007-12-28 15:15:47.000000000 -0800
@@ -4290,7 +4290,7 @@
        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 @@
         }
 
         *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++ = ')';
End of Patch.