diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-02-09 21:57:46 -0500 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1998-02-12 16:24:26 +0000 |
| commit | af3f8c16b7d4e5efdb489a6f2ca99936245fc279 (patch) | |
| tree | 364a1fc1faca396464a32a4c076eb5208e7fa897 /regexec.c | |
| parent | 4599a1dedd47b916c731b88cf14b8b7a145a28b0 (diff) | |
| download | perl-af3f8c16b7d4e5efdb489a6f2ca99936245fc279.tar.gz | |
5.004_5*: [PATCH] restore old behaviour of \1 in RE
p4raw-id: //depot/perl@505
Diffstat (limited to 'regexec.c')
| -rw-r--r-- | regexec.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -979,7 +979,7 @@ regmatch(regnode *prog) n = ARG(scan); /* which paren pair */ s = regstartp[n]; if (*reglastparen < n || !s) - break; /* Zero length always matches */ + sayNO; /* Do not match unless seen CLOSEn. */ if (s == regendp[n]) break; /* Inline the first character, for speed. */ |