diff options
| author | Andy Lester <andy@petdance.com> | 2005-03-14 07:59:54 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-03-18 13:38:32 +0000 |
| commit | 7fc634935189abec1d574a9733c7093e5c9f2781 (patch) | |
| tree | 812ca27d3ab8a2b9edc12b87c730981d50858d59 /pp_hot.c | |
| parent | ad5c2da20a409831a6acfe749626ce0396b43b3f (diff) | |
| download | perl-7fc634935189abec1d574a9733c7093e5c9f2781.tar.gz | |
More const parms
Message-ID: <20050314195954.GB7141@petdance.com>
p4raw-id: //depot/perl@24042
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1622,9 +1622,9 @@ Perl_do_readline(pTHX) continue; } } else if (SvUTF8(sv)) { /* OP_READLINE, OP_RCATLINE */ - U8 *s = (U8*)SvPVX(sv) + offset; - STRLEN len = SvCUR(sv) - offset; - U8 *f; + const U8 *s = (U8*)SvPVX(sv) + offset; + const STRLEN len = SvCUR(sv) - offset; + const U8 *f; if (ckWARN(WARN_UTF8) && !Perl_is_utf8_string_loc(aTHX_ s, len, &f)) |