From: Jeff Pinyan <japhy@pobox.com>
Date: Fri, 14 Sep 2001 20:58:30 +0000 (-0400)
Subject: adding (U8) to case insensitive matching
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6d1bf76a2a7ec340a0a264c83b0adae327703f32;p=p5sagit%2Fp5-mst-13.2.git

adding (U8) to case insensitive matching
Message-ID: <Pine.GSO.4.21.0109142057490.12393-100000@crusoe.crusoe.net>

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

diff --git a/regexec.c b/regexec.c
index cad6a40..b70896f 100644
--- a/regexec.c
+++ b/regexec.c
@@ -3286,8 +3286,8 @@ S_regmatch(pTHX_ regnode *prog)
 				    locinput++;
 			    } else {
 				while (locinput <= e
-				       && *locinput != c1
-				       && *locinput != c2)
+				       && (U8) *locinput != (U8) c1
+				       && (U8) *locinput != (U8) c2)
 				    locinput++;
 			    }
 			    count = locinput - old;