diff options
author | Yves Orton <demerphq@gmail.com> | 2006-06-13 11:39:42 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-06-13 08:32:04 +0000 |
commit | 13a24baded0bcfd57a5060f46aead50d004b1374 (patch) | |
tree | de800940e0a9748cdf6d1578c6302d4ddcfecf2c /regcomp.c | |
parent | 84c0b84e93593c55108ebfb4f82522eee2fd61e1 (diff) | |
download | perl-13a24baded0bcfd57a5060f46aead50d004b1374.tar.gz |
Guard clause should happen first, otherwise its not a guard clause.
Message-ID: <9b18b3110606130039v1c6a3fe6s448e92ab2a05888a@mail.gmail.com>
p4raw-id: //depot/perl@28391
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -2012,6 +2012,9 @@ S_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, SV *re_trie_maxbuff = NULL; GET_RE_DEBUG_FLAGS_DECL; +#ifdef DEBUGGING + StructCopy(&zero_scan_data, &data_fake, scan_data_t); +#endif while (scan && OP(scan) != END && scan < last) { /* Peephole optimizer: */ |