Silence one build-time warning

Observed in clang 9 and 10. Partial solution for Perl#17015
Corion · Jun 20, 2021 · 8993e34 · 8993e34
1 parent 47dc2f5
commit 8993e34
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/sv.c b/sv.c
@@ -12513,7 +12513,7 @@ Perl_sv_vcatpvfn_flags(pTHX_ SV *const sv, const char *const pat, const STRLEN p
                  && q == fmtstart + 1 /* plain %d, not %....d */
                  && patend >= fmtstart + sizeof(UTF8f) - 1 /* long enough */
                  && *q == '%'
-                 && strnEQ(q + 1, UTF8f + 2, sizeof(UTF8f) - 3))
+                 && strnEQ(q + 1, (UTF8f) + 2, sizeof(UTF8f) - 3))
             {
 		/* The argument has already gone through cBOOL, so the cast
 		   is safe. */