From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 27 Feb 2002 15:23:21 +0000 (+0000)
Subject: Signedness nit.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=061b10dfce470bbb836cfad9c4f660d034ac4121;p=p5sagit%2Fp5-mst-13.2.git

Signedness nit.

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

diff --git a/regexec.c b/regexec.c
index 61d175a..887c3bf 100644
--- a/regexec.c
+++ b/regexec.c
@@ -4268,7 +4268,7 @@ S_reginclasslen(pTHX_ register regnode *n, register U8* p, STRLEN* lenp, registe
 			    STRLEN len;
 			    char *s = SvPV(sv, len);
 			
-			    if (len <= plen && memEQ(s, p, len)) {
+			    if (len <= plen && memEQ(s, (char*)p, len)) {
 			        *lenp = len;
 				match = TRUE;
 				break;