diff options
| author | Richard Kandarian <richard.kandarian@lanl.gov> | 2002-11-21 01:00:20 -0700 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-12-23 05:27:25 +0000 |
| commit | 03994de86de9fdff188863fc25636fecf2362e27 (patch) | |
| tree | 03d3b5249fa159f7006edc3893c6edef0568a7a7 /regexec.c | |
| parent | 0773b1f011791ecd1735dad376fcc533a738a2f0 (diff) | |
| download | perl-03994de86de9fdff188863fc25636fecf2362e27.tar.gz | |
[perl #18544] Patch included to fix problem.
(from RT)
p4raw-id: //depot/perl@18342
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2110,6 +2110,7 @@ S_regtry(pTHX_ regexp *prog, char *startpos) PL_reglastparen = &prog->lastparen; PL_reglastcloseparen = &prog->lastcloseparen; prog->lastparen = 0; + prog->lastcloseparen = 0; PL_regsize = 0; DEBUG_r(PL_reg_starttry = startpos); if (PL_reg_start_tmpl <= prog->nparens) { |