get rid of "implicit fallthrough" warnings with gcc 7

1 files changed, 1 insertions, 0 deletions

diff --git a/mg.c b/mg.c
index fe4f8a5935..8c0c1b5dcd 100644
--- a/mg.c
+++ b/mg.c
@@ -994,6 +994,7 @@ Perl_magic_get(pTHX_ SV *sv, MAGIC *mg)
 	break;
 #endif  /* End of platforms with special handling for $^E; others just fall
            through to $! */
+    /* FALLTHROUGH */
 
     case '!':
 	{