X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/e6226b18246ce7d24213c41123114ac7967ed04f..1850c8f94216e3e6bf08ca1f3121b4a91d01d1bf:/utf8.c

diff --git a/utf8.c b/utf8.c
index 1f4192f..53085e6 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) {