diff options
author | Hugo van der Sanden <hv@crypt.org> | 2001-11-23 15:15:24 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-11-23 14:58:40 +0000 |
commit | a1917ab96472a0f938aee4646d539e070dc12cd3 (patch) | |
tree | 4d35bf29ff86d87260b1026dd452e78b068e120b /regcomp.c | |
parent | 2a5a0c38d81f8514d109f773aaadbf70b29e85b9 (diff) | |
download | perl-a1917ab96472a0f938aee4646d539e070dc12cd3.tar.gz |
Re: regex oddness with \Z and $&
Message-Id: <200111231515.fANFFOR10341@crypt.compulink.co.uk>
p4raw-id: //depot/perl@13198
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -2795,6 +2795,7 @@ tryagain: case 'Z': ret = reg_node(pRExC_state, SEOL); *flagp |= SIMPLE; + RExC_seen_zerolen++; /* Do not optimize RE away */ nextchar(pRExC_state); break; case 'z': |