From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 10 Jun 2010 08:01:18 +0000 (+0200)
Subject: Parameters for * in *printf must be int - add a cast to ensure this.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b00fc8d41de1694e3f43042249a46dd72bd0163a;p=p5sagit%2Fp5-mst-13.2.git

Parameters for * in *printf must be int - add a cast to ensure this.

Fixes a (legitimate) compiler warning present since 6e1bad6cc227c8e8.
---

diff --git a/toke.c b/toke.c
index 8a4af48..daa60a1 100644
--- a/toke.c
+++ b/toke.c
@@ -3270,7 +3270,8 @@ S_scan_const(pTHX_ char *start)
 			     * should the trailing NUL be missing that this
 			     * print won't run off the end of the string */
 			    Perl_warner(aTHX_ packWARN(WARN_DEPRECATED),
-				"Deprecated character in \\N{...}; marked by <-- HERE  in \\N{%.*s<-- HERE %.*s", i - s + 1, s, e - i, i + 1);
+					"Deprecated character in \\N{...}; marked by <-- HERE  in \\N{%.*s<-- HERE %.*s",
+					(int)(i - s + 1), s, (int)(e - i), i + 1);
 			}
 		    }
 		} /* End \N{NAME} */