summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-06-17 17:54:25 +0100
committerNicholas Clark <nick@ccl4.org>2010-06-17 17:54:25 +0100
commit313b38e51ccc38cdb7b246f596287a755f8f108b (patch)
treeb27aa49b5ec0aab566cb41128367e52a5a71db85
parent2d7e78b1bd24d3af5881f95a996405c9c11b1d59 (diff)
downloadperl-313b38e51ccc38cdb7b246f596287a755f8f108b.tar.gz
Avoid compiler warnings in Perl_foldEQ_utf8, spotted by Jerry D. Hedden.
-rw-r--r--utf8.c8
1 files changed, 6 insertions, 2 deletions
diff --git a/utf8.c b/utf8.c
index 1f4192f9ad..53085e6f4d 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2588,14 +2588,18 @@ Perl_foldEQ_utf8(pTHX_ const char *s1, char **pe1, register UV l1, bool u1, cons
* only go as far as the goal */
e1 = g1;
}
- else assert(e1); /* Must have an end for looking at s1 */
+ else {
+ assert(e1); /* Must have an end for looking at s1 */
+ }
/* Same for goal for s2 */
if (g2) {
assert(! e2 || e2 >= g2);
e2 = g2;
}
- else assert(e2);
+ else {
+ assert(e2);
+ }
/* Look through both strings, a character at a time */
while (p1 < e1 && p2 < e2) {