4th patch from:

Subject: [PATCH] Cleanup SVf arguments (2nd try)
Message-ID: <20070101201613.4120d9ef@r2d2>

Introduce an SVfARG() macro for %SVf (%-p here) arguments to
perl's printf

p4raw-id: //depot/perl@29687

1 files changed, 1 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index 918510f9c5..2bb9b664c7 100644
--- a/mg.c
+++ b/mg.c
@@ -2039,7 +2039,7 @@ Perl_vivify_defelem(pTHX_ SV *sv)
         if (he)
             value = HeVAL(he);
 	if (!value || value == &PL_sv_undef)
-	    Perl_croak(aTHX_ PL_no_helem_sv, (void*)mg->mg_obj);
+	    Perl_croak(aTHX_ PL_no_helem_sv, SVfARG(mg->mg_obj));
     }
     else {
 	AV* const av = (AV*)LvTARG(sv);