Refactor sv_dup to memcpy from source to destination, and only

[perl5.git] / utf8.h

diff --git a/utf8.h b/utf8.h
index fb44c85..c8bcb36 100644 (file)
--- a/utf8.h
+++ b/utf8.h
@@ -327,3 +327,5 @@ encoded character.
         (n) == 3 ? IS_UTF8_CHAR_3(p) : \
         (n) == 4 ? IS_UTF8_CHAR_4(p) : 0)
 
+#define IS_UTF8_CHAR_FAST(n) ((n) <= 4)
+