This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: Clarify comment
authorKarl Williamson <khw@cpan.org>
Tue, 5 Feb 2019 01:27:38 +0000 (18:27 -0700)
committerKarl Williamson <khw@cpan.org>
Tue, 5 Feb 2019 16:31:45 +0000 (09:31 -0700)
regcomp.c

index 4937292..66cc6e0 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -10604,7 +10604,8 @@ Perl__invlistEQ(pTHX_ SV* const a, SV* const b, const bool complement_b)
 
 /*
  * As best we can, determine the characters that can match the start of
- * the given EXACTF-ish node.
+ * the given EXACTF-ish node.  This is for use in creating ssc nodes, so there
+ * can be false positive matches
  *
  * Returns the invlist as a new SV*; it is the caller's responsibility to
  * call SvREFCNT_dec() when done with it.