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
authorKarl Williamson <khw@cpan.org>
Fri, 15 May 2015 15:16:18 +0000 (09:16 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 1 Aug 2015 16:34:50 +0000 (10:34 -0600)
The trailing underscore was unintended.

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