From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 17 Apr 2008 10:03:04 +0000 (+0000)
Subject: %.*s mandates an "int", says the C standard
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c49b597d07430509a57aa1eb8401de4245277a3a;p=p5sagit%2Fp5-mst-13.2.git

%.*s mandates an "int", says the C standard

p4raw-id: //depot/perl@33704
---

diff --git a/gv.c b/gv.c
index 2b381a6..5eb09c2 100644
--- a/gv.c
+++ b/gv.c
@@ -671,7 +671,7 @@ Perl_gv_fetchmethod_flags(pTHX_ HV *stash, const char *name, U32 flags)
 	    if (stash) {
 		Perl_croak(aTHX_
 			   "Can't locate object method \"%s\" via package \"%.*s\"",
-			   name, (STRLEN)HvNAMELEN_get(stash), HvNAME_get(stash));
+			   name, (int)HvNAMELEN_get(stash), HvNAME_get(stash));
 	    }
 	    else {
 		STRLEN packlen;