From: Karl Williamson Date: Wed, 13 May 2015 23:27:48 +0000 (-0600) Subject: utf8.h: Add UTF8_SKIP as a synonym for UTF8SKIP X-Git-Tag: v5.23.2~68 X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/2a70536ef492d7fd0a8c857eecc3f2d6fe143728 utf8.h: Add UTF8_SKIP as a synonym for UTF8SKIP Most of the other names in utf8.h have an underscore; this allows someone to keep things consistent in their code. --- diff --git a/utf8.h b/utf8.h index 19e5d96..3e6e409 100644 --- a/utf8.h +++ b/utf8.h @@ -367,7 +367,8 @@ only) byte is pointed to by C. =cut */ -#define UTF8SKIP(s) PL_utf8skip[*(const U8*)(s)] +#define UTF8SKIP(s) PL_utf8skip[*(const U8*)(s)] +#define UTF8_SKIP(s) UTF8SKIP(s) /* Is the byte 'c' the same character when encoded in UTF-8 as when not. This * works on both UTF-8 encoded strings and non-encoded, as it returns TRUE in