From: Karl Williamson <public@khwilliamson.com>
Date: Mon, 15 Nov 2010 19:40:16 +0000 (-0700)
Subject: regcomp.c: Add comment
X-Git-Tag: accepted/trunk/20130322.191538~6632
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=08fc12dd6e00da45cd6b494e4eac7aadb9ed6e0c;p=platform%2Fupstream%2Fperl.git

regcomp.c: Add comment
---

diff --git a/regcomp.c b/regcomp.c
index 59f8bcf..ec4c792 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -8321,6 +8321,9 @@ parseit:
 			(value=='p' ? '+' : '!'), (int)n, RExC_parse);
 		}
 		RExC_parse = e + 1;
+
+		/* The \p could match something in the Latin1 range, hence
+		 * something that isn't utf8 */
 		ANYOF_FLAGS(ret) |= ANYOF_NONBITMAP;
 		namedclass = ANYOF_MAX;  /* no official name, but it's named */
 		}