Missing from #8439.

p4raw-id: //depot/perl@8443

1 files changed, 1 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index 4f183b02c5..9f05d3c2c4 100644
--- a/mg.c
+++ b/mg.c
@@ -1433,7 +1433,7 @@ Perl_magic_setsubstr(pTHX_ SV *sv, MAGIC *mg)
     }
     else if (SvUTF8(lsv)) {
 	sv_pos_u2b(lsv, &lvoff, &lvlen);
-	tmps = bytes_to_utf8(tmps, &len);
+	tmps = (char*)bytes_to_utf8((U8*)tmps, &len);
 	sv_insert(lsv, lvoff, lvlen, tmps, len);
 	Safefree(tmps);
     }