utf8.c: Use casts to silence some warnings

1 files changed, 2 insertions, 2 deletions

diff --git a/utf8.c b/utf8.c
index 56c83bd6a8..819a48588a 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2013,8 +2013,8 @@ Perl__utf8n_to_uvchr_msgs_helper(const U8 *s,
                          * valid, avoid as much as possible reading past the
                          * end of the buffer */
                         int printlen = (flags & _UTF8_NO_CONFIDENCE_IN_CURLEN)
-                                       ? s - s0
-                                       : send - s0;
+                                       ? (int) (s - s0)
+                                       : (int) (send - s0);
                         pack_warn = packWARN(WARN_UTF8);
                         message = Perl_form(aTHX_ "%s",
                             unexpected_non_continuation_text(s0,