From 4f849cb60a2a440282f411728509645586512c9f Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Wed, 19 Dec 2001 14:18:10 +0000 Subject: Can't printf U8s as UVs. p4raw-id: //depot/perl@13801 --- utf8.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'utf8.c') diff --git a/utf8.c b/utf8.c index 4ca7b1c1f0..b3acd0cbee 100644 --- a/utf8.c +++ b/utf8.c @@ -255,7 +255,7 @@ Perl_utf8n_to_uvuni(pTHX_ U8 *s, STRLEN curlen, STRLEN *retlen, U32 flags) UV uv = *s, ouv = 0; STRLEN len = 1; bool dowarn = ckWARN_d(WARN_UTF8); - U8 startbyte = *s; + UV startbyte = *s; STRLEN expectlen = 0; U32 warning = 0; -- cgit v1.2.1