diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-18 22:50:28 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-11-18 22:50:28 +0000 |
commit | b76347f2eb34c85a0a38543b2f57ca474fedab4d (patch) | |
tree | 31cc323c41bcb1ac42ff13659898c6589d43cf19 /proto.h | |
parent | 5a2dd41731da4a994683b80fc75b362161912f47 (diff) | |
download | perl-b76347f2eb34c85a0a38543b2f57ca474fedab4d.tar.gz |
Introduce Perl_utf8_length(). Use it.
p4raw-id: //depot/perl@7744
Diffstat (limited to 'proto.h')
-rw-r--r-- | proto.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -805,6 +805,7 @@ PERL_CALLCONV void Perl_unshare_hek(pTHX_ HEK* hek); PERL_CALLCONV void Perl_utilize(pTHX_ int aver, I32 floor, OP* version, OP* id, OP* arg); PERL_CALLCONV U8* Perl_utf16_to_utf8(pTHX_ U8* p, U8 *d, I32 bytelen, I32 *newlen); PERL_CALLCONV U8* Perl_utf16_to_utf8_reversed(pTHX_ U8* p, U8 *d, I32 bytelen, I32 *newlen); +PERL_CALLCONV STRLEN Perl_utf8_length(pTHX_ U8* s, U8 *e); PERL_CALLCONV I32 Perl_utf8_distance(pTHX_ U8 *a, U8 *b); PERL_CALLCONV U8* Perl_utf8_hop(pTHX_ U8 *s, I32 off); PERL_CALLCONV U8* Perl_utf8_to_bytes(pTHX_ U8 *s, STRLEN *len); |