Change 29472 by [EMAIL PROTECTED] on 2006/12/05 22:40:56

        Subject: Re: [PATCH] Further tweaks to make it easier to create regexp 
engine plug ins.
        From: demerphq <[EMAIL PROTECTED]>
        Message-ID: <[EMAIL PROTECTED]>
        Date: Tue, 5 Dec 2006 22:53:48 +0100
        
        Fixes a minor bug in change 29468.

Affected files ...

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

Differences ...

==== //depot/perl/regcomp.c#526 (text) ====
Index: perl/regcomp.c
--- perl/regcomp.c#525~29468~   2006-12-05 07:39:39.000000000 -0800
+++ perl/regcomp.c      2006-12-05 14:40:56.000000000 -0800
@@ -8707,7 +8707,7 @@
     Newx(ret->endp, npar, I32);
     Copy(r->endp, ret->endp, npar, I32);
 
-    if (ret->substrs) {
+    if (r->substrs) {
         Newx(ret->substrs, 1, struct reg_substr_data);
         for (s = ret->substrs->data, i = 0; i < 3; i++, s++) {
             s->min_offset = r->substrs->data[i].min_offset;
End of Patch.

Reply via email to