From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 19 Dec 2001 14:18:10 +0000 (+0000)
Subject: Can't printf U8s as UVs.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4f849cb60a2a440282f411728509645586512c9f;p=p5sagit%2Fp5-mst-13.2.git

Can't printf U8s as UVs.

p4raw-id: //depot/perl@13801
---

diff --git a/utf8.c b/utf8.c
index 4ca7b1c..b3acd0c 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;