diff options
| author | Andy Lester <andy@petdance.com> | 2005-07-18 05:37:38 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-07-18 15:23:38 +0000 |
| commit | 9a957fbc017c803266bc4e3766dfcbfb58cfa99b (patch) | |
| tree | beed88f144e14ca4175e374522d11a7175c151eb /regcomp.c | |
| parent | 8896765ab803e8ecde87ca250efb892518f0df16 (diff) | |
| download | perl-9a957fbc017c803266bc4e3766dfcbfb58cfa99b.tar.gz | |
The continuing plod through embed.fnc
Message-ID: <20050718153738.GB20193@petdance.com>
p4raw-id: //depot/perl@25172
Diffstat (limited to 'regcomp.c')
| -rw-r--r-- | regcomp.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1540,7 +1540,8 @@ S_make_trie(pTHX_ RExC_state_t *pRExC_state, regnode *startbranch, regnode *firs STATIC I32 -S_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, regnode *last, scan_data_t *data, U32 flags, U32 depth) +S_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, + regnode *last, scan_data_t *data, U32 flags, U32 depth) /* scanp: Start here (read-write). */ /* deltap: Write maxlen-minlen here. */ /* last: Stop before this one. */ @@ -2001,7 +2002,7 @@ S_study_chunk(pTHX_ RExC_state_t *pRExC_state, regnode **scanp, I32 *deltap, reg } sv_catpvn(data->last_found, STRING(scan), STR_LEN(scan)); { - SV * sv = data->last_found; + SV * const sv = data->last_found; MAGIC * const mg = SvUTF8(sv) && SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : NULL; if (mg && mg->mg_len >= 0) |