From 8993e34a9f055e9bc6484c2e1638361d847a1d18 Mon Sep 17 00:00:00 2001 From: James E Keenan Date: Sun, 28 Mar 2021 14:23:41 +0000 Subject: [PATCH] Silence one build-time warning Observed in clang 9 and 10. Partial solution for https://github.com/Perl/perl5/issues/17015 --- sv.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sv.c b/sv.c index b1a95a80ca21..c040d9a8a40c 100644 --- 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. */