summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2000-11-18 22:50:28 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-18 22:50:28 +0000
commitb76347f2eb34c85a0a38543b2f57ca474fedab4d (patch)
tree31cc323c41bcb1ac42ff13659898c6589d43cf19 /proto.h
parent5a2dd41731da4a994683b80fc75b362161912f47 (diff)
downloadperl-b76347f2eb34c85a0a38543b2f57ca474fedab4d.tar.gz
Introduce Perl_utf8_length(). Use it.
p4raw-id: //depot/perl@7744
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/proto.h b/proto.h
index 052346d782..91b7f86d10 100644
--- a/proto.h
+++ b/proto.h
@@ -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);