diff options
author | Andy Lester <andy@petdance.com> | 2005-06-06 05:11:07 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-07 17:03:16 +0000 |
commit | 66a1b24beb76ea873ad4caa57ee3ab9df945afbf (patch) | |
tree | e59a6ec85d3a4225104f0176749497fb46256961 /toke.c | |
parent | f681a178ed5ab9eaae71b97c6eea3744c0304d67 (diff) | |
download | perl-66a1b24beb76ea873ad4caa57ee3ab9df945afbf.tar.gz |
Random cleanups #47
Message-ID: <20050606151107.GC7022@petdance.com>
p4raw-id: //depot/perl@24735
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -9908,7 +9908,7 @@ S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims) while (cont) { int offset = s - SvPVX_const(PL_linestr); - bool found = sv_cat_decode(sv, PL_encoding, PL_linestr, + const bool found = sv_cat_decode(sv, PL_encoding, PL_linestr, &offset, (char*)termstr, termlen); const char *ns = SvPVX_const(PL_linestr) + offset; char *svlast = SvEND(sv) - 1; |