diff options
author | Hugo van der Sanden <hv@crypt.org> | 2001-05-21 17:32:02 +0100 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-23 22:04:05 +0000 |
commit | 997999616a41239c1d6c9779baa38c6a3a23f85e (patch) | |
tree | 3e6b66ddb937c7ead846d0a6a9fd612999edb95f /regcomp.c | |
parent | b4c2bf25e07c61dbbe9f49212bf3585b479358e1 (diff) | |
download | perl-997999616a41239c1d6c9779baa38c6a3a23f85e.tar.gz |
Re: [ID 20000716.007] \G in a m//g expression causes problems
Message-Id: <200105211532.QAA03999@crypt.compulink.co.uk>
p4raw-id: //depot/perl@10187
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1059,7 +1059,7 @@ S_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, reg if (!scan) /* It was not CURLYX, but CURLY. */ scan = next; if (ckWARN(WARN_REGEXP) && (minnext + deltanext == 0) - && !(data->flags & (SF_HAS_PAR|SF_IN_PAR)) + && data && !(data->flags & (SF_HAS_PAR|SF_IN_PAR)) && maxcount <= REG_INFTY/3) /* Complement check for big count */ { vWARN(RExC_parse, |