diff options
author | James E Keenan <jkeenan@cpan.org> | 2021-03-28 14:23:41 +0000 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2021-03-31 21:19:03 -0400 |
commit | efceac507985adfedfc573aedee5bd69da96ecb0 (patch) | |
tree | 6df2ed63819ec6c197133b70a2c7dde94070c676 /sv.c | |
parent | 77c0161925c445a429e3aa990fe5b00af24f43f5 (diff) | |
download | perl-efceac507985adfedfc573aedee5bd69da96ecb0.tar.gz |
Silence one build-time warning
Observed in clang 9 and 10.
Partial solution for https://github.com/Perl/perl5/issues/17015
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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. */ |