This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: clarify comment
authorKarl Williamson <public@khwilliamson.com>
Sat, 11 Dec 2010 21:21:40 +0000 (14:21 -0700)
committerKarl Williamson <public@khwilliamson.com>
Sat, 11 Dec 2010 21:26:05 +0000 (14:26 -0700)
regcomp.c

index 4fb8c37..34c4e95 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -8732,8 +8732,7 @@ parseit:
                }
                stored+=2; /* can't optimize this class */
 
-               /* All but ASCII can match Unicode characters, but all the ones
-                * that aren't in utf8 are in the bitmap */
+               /* All but ASCII can match characters storable only in utf8 */
                if (namedclass != ANYOF_ASCII) {
                    ANYOF_FLAGS(ret) |= ANYOF_UTF8;
                }