type mismatch

p4raw-id: //depot/perl@5603

1 files changed, 1 insertions, 1 deletions

diff --git a/sv.c b/sv.c
index f062bbb10c..6f40d6fa92 100644
--- a/sv.c
+++ b/sv.c
@@ -5824,7 +5824,7 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV
 		else if (svix < svmax)
 		    vecsv = svargs[svix++];
 		else {
-		    vecstr = "";
+		    vecstr = (U8*)"";
 		    veclen = 0;
 		    continue;
 		}