This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
utf8.h: Clarify comment
authorKarl Williamson <khw@cpan.org>
Sat, 11 Feb 2017 19:57:33 +0000 (12:57 -0700)
committerKarl Williamson <khw@cpan.org>
Sun, 12 Feb 2017 04:11:13 +0000 (21:11 -0700)
utf8.h

diff --git a/utf8.h b/utf8.h
index e077c25..affa2d6 100644 (file)
--- a/utf8.h
+++ b/utf8.h
@@ -802,10 +802,10 @@ case any call to string overloading updates the internal UTF-8 encoding flag.
 #define UTF8_WARN_ILLEGAL_INTERCHANGE \
                           (UTF8_WARN_ILLEGAL_C9_INTERCHANGE|UTF8_WARN_NONCHAR)
 
-/* This is used typically for code that is willing to accept inputs of
- * illformed UTF-8 sequences, for whatever reason.  However, all such sequences
- * evaluate to the REPLACEMENT CHARACTER unless other flags overriding this are
- * also present. */
+/* This is typically used for code that processes UTF-8 input and doesn't want
+ * to have to deal with any malformations that might be present.  All such will
+ * be safely replaced by the REPLACEMENT CHARACTER, unless other flags
+ * overriding this are also present. */
 #define UTF8_ALLOW_ANY ( UTF8_ALLOW_CONTINUATION                                \
                         |UTF8_ALLOW_NON_CONTINUATION                            \
                         |UTF8_ALLOW_SHORT                                       \