Change 13801 by jhi@alpha on 2001/12/19 14:18:10
Can't printf U8s as UVs.
Affected files ...
.... //depot/perl/utf8.c#134 edit
Differences ...
==== //depot/perl/utf8.c#134 (text) ====
Index: perl/utf8.c
--- perl/utf8.c.~1~ Wed Dec 19 07:30:05 2001
+++ perl/utf8.c Wed Dec 19 07:30:05 2001
@@ -255,7 +255,7 @@
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;
End of Patch.
