1 files changed, 1 insertions, 3 deletions
diff --git a/perlio.c b/perlio.c
index 209af1b0f1..122cfccd23 100644
--- a/perlio.c
+++ b/perlio.c
@@ -934,9 +934,7 @@ PerlIO_parse_layers(pTHX_ PerlIO_list_t *av, const char *names)
 			    if (*e++) {
 				break;
 			    }
-			    /*
-			     * Drop through
-			     */
+                            /* Fall through */
 			case '\0':
 			    e--;
 			    Perl_ck_warner(aTHX_ packWARN(WARN_LAYER),