From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 30 Dec 2000 20:24:56 +0000 (+0000)
Subject: Signedness nit.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6cd5fe39fa1bd5c9b9405bc841a97336a355ddac;p=p5sagit%2Fp5-mst-13.2.git

Signedness nit.

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

diff --git a/utf8.c b/utf8.c
index f65c94f..99cb8b9 100644
--- a/utf8.c
+++ b/utf8.c
@@ -167,7 +167,7 @@ Perl_is_utf8_string(pTHX_ U8 *s, STRLEN len)
     STRLEN c;
 
     if (!len)
-	len = strlen(s);
+	len = strlen((char *)s);
     send = s + len;
 
     while (x < send) {