remove $^U dependent behaviors in runtime; chr() and sprintf('%c',...)

now return bytes all the way to 255, they will be transparently
coerced (in future) to UTF-8 when they are used in operations
involving other UTF-8 strings; C<use utf8> doesn't set $^U anymore

p4raw-id: //depot/perl@5013

1 files changed, 1 insertions, 1 deletions

diff --git a/sv.c b/sv.c
index 0cf3b4c7da..29bf2fb1cf 100644
--- a/sv.c
+++ b/sv.c
@@ -5830,7 +5830,7 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV
 		uv = va_arg(*args, int);
 	    else
 		uv = (svix < svmax) ? SvIVx(svargs[svix++]) : 0;
-	    if (uv >= 128 && PL_bigchar && !IN_BYTE) {
+	    if ((uv > 255 || (uv > 127 && SvUTF8(sv))) && !IN_BYTE) {
 		eptr = (char*)utf8buf;
 		elen = uv_to_utf8((U8*)eptr, uv) - utf8buf;
 		is_utf = TRUE;