This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
utf8.h: Fix typo in macro name definition
[perl5.git] / utf8.h
diff --git a/utf8.h b/utf8.h
index bcc92b4..d4c8e55 100644 (file)
--- a/utf8.h
+++ b/utf8.h
@@ -558,7 +558,7 @@ case any call to string overloading updates the internal UTF-8 encoding flag.
  * applicable */
 #define UTF8_IS_NONCHAR_GIVEN_THAT_NON_SUPER_AND_GE_PROBLEMATIC(s)             \
                                                     cBOOL(is_NONCHAR_utf8(s))
-#define UTF8_IS_NONCHAR_(s)                                                    \
+#define UTF8_IS_NONCHAR(s)                                                     \
                     UTF8_IS_NONCHAR_GIVEN_THAT_NON_SUPER_AND_GE_PROBLEMATIC(s)
 
 #define UNICODE_SURROGATE_FIRST                0xD800