1 files changed, 1 insertions, 2 deletions
diff --git a/dump.c b/dump.c
index 7f221814a9..2a78e7879c 100644
--- a/dump.c
+++ b/dump.c
@@ -1450,8 +1450,7 @@ Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bo
     case SVt_PVMG:
 	if (SvPAD_TYPED(sv))	sv_catpv(d, "TYPED,");
 	if (SvPAD_OUR(sv))	sv_catpv(d, "OUR,");
-	if (SvPAD_STATE(sv))	sv_catpv(d, "STATE,");
-	break;
+	/* FALL THROUGH */
     case SVt_PVNV:
 	if (SvPAD_STATE(sv))	sv_catpv(d, "STATE,");
 	goto evaled_or_uv;