diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-02-08 18:22:42 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-02-08 18:22:42 +0000 |
| commit | f3b9ce0f2eed4dfc9dec3df94bf1336eea7ecf86 (patch) | |
| tree | 99661f6d497c64ab3a4c9da776d688a43122e337 /toke.c | |
| parent | 5fc0f0f6e90f423ffa278e3f31f7021206604ee9 (diff) | |
| download | perl-f3b9ce0f2eed4dfc9dec3df94bf1336eea7ecf86.tar.gz | |
Signedness nits.
p4raw-id: //depot/perl@18674
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -6901,7 +6901,7 @@ S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims) termlen = 1; } else { - termcode = utf8_to_uvchr(s, &termlen); + termcode = utf8_to_uvchr((U8*)s, &termlen); Copy(s, termstr, termlen, U8); if (!UTF8_IS_INVARIANT(term)) has_utf8 = TRUE; @@ -6935,7 +6935,7 @@ S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims) while (cont) { int offset = s - SvPVX(PL_linestr); bool found = sv_cat_decode(sv, PL_encoding, PL_linestr, - &offset, termstr, termlen); + &offset, (char*)termstr, termlen); char *ns = SvPVX(PL_linestr) + offset; char *svlast = SvEND(sv) - 1; @@ -7023,7 +7023,7 @@ S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims) else if (*s == term) { if (termlen == 1) break; - if (s+termlen <= PL_bufend && memEQ(s, termstr, termlen)) + if (s+termlen <= PL_bufend && memEQ(s, (char*)termstr, termlen)) break; } else if (!has_utf8 && !UTF8_IS_INVARIANT((U8)*s) && UTF) |