diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-01-22 03:45:01 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-01-22 03:45:01 +0000 |
| commit | bdf77a2af039cc96899b27672b758a8e2363d4ae (patch) | |
| tree | e074745561e1b6d8b2aacc30cffde8141c32457e /sv.c | |
| parent | 8d47197eb363bdb1167dea02a8497528bfa0ddaf (diff) | |
| download | perl-bdf77a2af039cc96899b27672b758a8e2363d4ae.tar.gz | |
Continuation of #18542.
p4raw-id: //depot/perl@18544
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -5683,21 +5683,21 @@ Perl_sv_pos_u2b(pTHX_ register SV *sv, I32* offsetp, I32* lenp) MAGIC *mg = 0; bool found = FALSE; - if (S_utf8_mg_pos(sv, &mg, &cache, 0, offsetp, *offsetp, &s, start, send)) + if (utf8_mg_pos(sv, &mg, &cache, 0, offsetp, *offsetp, &s, start, send)) found = TRUE; if (!found && uoffset > 0) { while (s < send && uoffset--) s += UTF8SKIP(s); if (s >= send) s = send; - if (S_utf8_mg_pos_init(sv, &mg, &cache, 0, offsetp, s, start)) + if (utf8_mg_pos_init(sv, &mg, &cache, 0, offsetp, s, start)) boffset = cache[1]; *offsetp = s - start; } if (lenp) { found = FALSE; start = s; - if (S_utf8_mg_pos(sv, &mg, &cache, 2, lenp, *lenp + *offsetp, &s, start, send)) { + if (utf8_mg_pos(sv, &mg, &cache, 2, lenp, *lenp + *offsetp, &s, start, send)) { *lenp -= boffset; found = TRUE; } @@ -5708,7 +5708,7 @@ Perl_sv_pos_u2b(pTHX_ register SV *sv, I32* offsetp, I32* lenp) s += UTF8SKIP(s); if (s >= send) s = send; - if (S_utf8_mg_pos_init(sv, &mg, &cache, 2, lenp, s, start)) + if (utf8_mg_pos_init(sv, &mg, &cache, 2, lenp, s, start)) cache[2] += *offsetp; } *lenp = s - start; |