From 97e916ed683ce1dd68d3c930724281ece2649ebb Mon Sep 17 00:00:00 2001 From: Yves Orton Date: Fri, 26 Oct 2012 11:41:10 +0200 Subject: [PATCH] silence warning in toke.c charnames support In a C sprintf the expectation is that * parameters are type "int". --- toke.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/toke.c b/toke.c index 8500573..45468b3 100644 --- a/toke.c +++ b/toke.c @@ -8935,7 +8935,7 @@ S_new_constant(pTHX_ const char *s, STRLEN len, const char *key, STRLEN keylen, if (strEQ(key,"charnames")) { msg = Perl_newSVpvf(aTHX_ /* The +3 is for '\N{'; -4 for that, plus '}' */ - "Unknown charname '%.*s'", typelen - 4, type + 3); + "Unknown charname '%.*s'", (int)typelen - 4, type + 3); } else { msg = Perl_newSVpvf(aTHX_ "Constant(%s): %s%s%s", -- 2.7.4