diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-03-21 17:30:05 -0600 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-03-30 21:40:35 -0600 |
| commit | 6bd1c396b29a11ce2a73ba5ea88ab2e86cca27b6 (patch) | |
| tree | 0c8ed691ebd795d315724d4a275ef1ef4c090927 /utf8.c | |
| parent | 80050966fb37f3e541e5725988d9fbb510d7662a (diff) | |
| download | perl-6bd1c396b29a11ce2a73ba5ea88ab2e86cca27b6.tar.gz | |
Use remove more uses of utf8_to_uvchr()
Commit 4b88fb76efce8c436e63b907c9842345d4fa77c7 missed 2 occurrences of
this, one of which is #ifdef'd out.
Diffstat (limited to 'utf8.c')
| -rw-r--r-- | utf8.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -2221,7 +2221,7 @@ Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp, STRLEN tlen = 0; while (t < tend) { - const UV c = utf8_to_uvchr(t, &tlen); + const UV c = utf8_to_uvchr_buf(t, tend, &tlen); if (tlen > 0) { d = uvchr_to_utf8(d, UNI_TO_NATIVE(c)); t += tlen; @@ -2262,7 +2262,7 @@ Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp, if (lenp) *lenp = len; - return len ? utf8_to_uvchr(ustrp, 0) : 0; + return len ? valid_utf8_to_uvchr(ustrp, 0) : 0; } STATIC UV |