1 files changed, 2 insertions, 1 deletions
diff --git a/pad.c b/pad.c
index cc74cb1a30..80e930e03c 100644
--- a/pad.c
+++ b/pad.c
@@ -1031,7 +1031,8 @@ Perl_pad_leavemy(pTHX)
 	    if (sv && sv != &PL_sv_undef
 		    && !SvFAKE(sv) && ckWARN_d(WARN_INTERNAL))
 		Perl_warner(aTHX_ packWARN(WARN_INTERNAL),
-					"%"SVf" never introduced", sv);
+			    "%"SVf" never introduced",
+			    (void*)sv);
 	}
     }
     /* "Deintroduce" my variables that are leaving with this scope. */