From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 29 Dec 2000 06:35:23 +0000 (+0000)
Subject: Signedness nit.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a7514e1ec900a5b60cda6ed25728476973d26ae0;p=p5sagit%2Fp5-mst-13.2.git

Signedness nit.

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

diff --git a/pp_hot.c b/pp_hot.c
index d02f57e..c7555c4 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1856,7 +1856,7 @@ PP(pp_subst)
 	DIE(aTHX_ "panic: pp_subst");
 
     strend = s + len;
-    slen = do_utf8 ? utf8_length(s, strend) : len;
+    slen = do_utf8 ? utf8_length((U8*)s, (U8*)strend) : len;
     maxiters = 2 * slen + 10;	/* We can match twice at each
 				   position, once with zero-length,
 				   second time with non-zero. */