This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: clarify comments
authorKarl Williamson <public@khwilliamson.com>
Tue, 8 Mar 2011 22:25:27 +0000 (15:25 -0700)
committerKarl Williamson <public@khwilliamson.com>
Wed, 9 Mar 2011 06:22:15 +0000 (23:22 -0700)
regcomp.c

index 9357a78..53047ee 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -773,7 +773,7 @@ S_cl_init_zero(const RExC_state_t *pRExC_state, struct regnode_charclass_class *
 }
 
 /* 'And' a given class with another one.  Can create false positives */
-/* We assume that cl is not inverted */
+/* cl should not be inverted */
 STATIC void
 S_cl_and(struct regnode_charclass_class *cl,
        const struct regnode_charclass_class *and_with)
@@ -829,7 +829,7 @@ S_cl_and(struct regnode_charclass_class *cl,
 }
 
 /* 'OR' a given class with another one.  Can create false positives */
-/* We assume that cl is not inverted */
+/* cl should not be inverted */
 STATIC void
 S_cl_or(const RExC_state_t *pRExC_state, struct regnode_charclass_class *cl, const struct regnode_charclass_class *or_with)
 {