This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
utf8.c: Clarify comment
authorKarl Williamson <khw@cpan.org>
Sat, 31 Mar 2018 16:30:14 +0000 (10:30 -0600)
committerKarl Williamson <khw@cpan.org>
Sat, 31 Mar 2018 21:36:45 +0000 (15:36 -0600)
utf8.c

diff --git a/utf8.c b/utf8.c
index 30a83e2..823429f 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -3671,7 +3671,7 @@ S_check_locale_boundary_crossing(pTHX_ const U8* const p, const UV result,
     assert(UTF8_IS_ABOVE_LATIN1(*p));
 
     /* We know immediately if the first character in the string crosses the
-     * boundary, so can skip */
+     * boundary, so can skip testing */
     if (result > 255) {
 
        /* Look at every character in the result; if any cross the