diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-10-31 14:51:48 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-10-31 14:51:48 +0000 |
commit | 1754c1a12c44346c579c5581660df4064b19f4a0 (patch) | |
tree | ff519f47f9edf2597cd636d6dc5d332fda778c57 /embed.fnc | |
parent | 9fe371da3bdc2d1a5eae907101756f87eb5d2168 (diff) | |
download | perl-1754c1a12c44346c579c5581660df4064b19f4a0.tar.gz |
A more elegant way to deal with utf8n_to_uvchr() and utf8n_to_uvuni().
p4raw-id: //depot/perl@25926
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 12 |
1 files changed, 12 insertions, 0 deletions
@@ -857,9 +857,21 @@ ApMd |U8* |bytes_from_utf8|NN const U8 *s|NN STRLEN *len|NULLOK bool *is_utf8 ApMd |U8* |bytes_to_utf8 |NN const U8 *s|NN STRLEN *len Apd |UV |utf8_to_uvchr |NN const U8 *s|NULLOK STRLEN *retlen Apd |UV |utf8_to_uvuni |NN const U8 *s|NULLOK STRLEN *retlen + +#ifdef EBCDIC Adp |UV |utf8n_to_uvchr |NN const U8 *s|STRLEN curlen|NULLOK STRLEN *retlen|U32 flags +#else +Adpbm |UV |utf8n_to_uvchr |NN const U8 *s|STRLEN curlen|NULLOK STRLEN *retlen|U32 flags +#endif + Adp |UV |utf8n_to_uvuni |NN const U8 *s|STRLEN curlen|NULLOK STRLEN *retlen|U32 flags + +#ifdef EBCDIC Apd |U8* |uvchr_to_utf8 |NN U8 *d|UV uv +#else +Apdbm |U8* |uvchr_to_utf8 |NN U8 *d|UV uv +#endif + Apbm |U8* |uvuni_to_utf8 |NN U8 *d|UV uv Ap |U8* |uvchr_to_utf8_flags |NN U8 *d|UV uv|UV flags Apd |U8* |uvuni_to_utf8_flags |NN U8 *d|UV uv|UV flags |