Only test SvTAIL when SvVALID

Only use the SvTAIL() macro when we've already confirmed that
the SV is SvVALID() - this is in preparation for removing the
SVpbm_TAIL flag in the next commit

1 files changed, 5 insertions, 2 deletions

diff --git a/dump.c b/dump.c
index 5b59500952..49a03a5738 100644
--- a/dump.c
+++ b/dump.c
@@ -1513,8 +1513,11 @@ Perl_do_sv_dump(pTHX_ I32 level, PerlIO *file, SV *sv, I32 nest, I32 maxnest, bo
 	if (SvIsUV(sv) && !(flags & SVf_ROK))	sv_catpv(d, "IsUV,");
 	break;
     case SVt_PVMG:
-	if (SvTAIL(sv))		sv_catpv(d, "TAIL,");
-	if (SvVALID(sv))	sv_catpv(d, "VALID,");
+	if (SvVALID(sv)) {
+            sv_catpv(d, "VALID,");
+            if (SvTAIL(sv))
+                sv_catpv(d, "TAIL,");
+            }
 	goto do_uv;
     case SVt_PVAV:
 	break;