This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: Rmv misleading comment
authorKarl Williamson <khw@cpan.org>
Fri, 24 Apr 2020 13:26:15 +0000 (07:26 -0600)
committerKarl Williamson <khw@cpan.org>
Mon, 12 Oct 2020 15:45:47 +0000 (09:45 -0600)
This NOTREACHED's presence just before an else would make one think
there is something funny going one, when there isn't.

regcomp.c

index e111dc6..dc6b84e 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -12815,7 +12815,6 @@ S_regpiece(pTHX_ RExC_state_t *pRExC_state, I32 *flagp, U32 depth)
                                      ? RExC_parse - origparse
                                      : 0),
                        origparse));
-            /* NOT-REACHED */
         } else {
             ckWARN2reg(RExC_parse,
                        "%" UTF8f " matches null string many times",