1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index ecfbd69ced..83169a327c 100644
--- a/utf8.c
+++ b/utf8.c
@@ -1615,7 +1615,7 @@ Perl_swash_init(pTHX_ const char* pkg, const char* name, SV *listsv, I32 minbits
     if (!SvROK(retval) || SvTYPE(SvRV(retval)) != SVt_PVHV) {
         if (SvPOK(retval))
 	    Perl_croak(aTHX_ "Can't find Unicode property definition \"%"SVf"\"",
-		       retval);
+		       (void*)retval);
 	Perl_croak(aTHX_ "SWASHNEW didn't return an HV ref");
     }
     return retval;