summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYitzchak Scott-Thoennes <sthoenna@efn.org>2000-11-06 07:19:05 -0800
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-07 00:04:17 +0000
commit9e29e5ff005da001be364f21377fa2a6364952d5 (patch)
tree8ac5b4e4f8e813f4b52e30e001501dbdc6272156
parent6be8f7a639aa6b6c116e29c11f6b58a558cf0865 (diff)
downloadperl-9e29e5ff005da001be364f21377fa2a6364952d5.tar.gz
Varargs don't always work too well if one puts an unsigned
char on the stack and pop an unsigned quad off the stack. Subject: Re: [ID 20001103.002] Not OK: perl v5.7.0 +DEVEL7523 on os2-64int-ld-2.30 (UNINSTALLED) Message-ID: <pxzB6gzkgKXY092yn@efn.org> p4raw-id: //depot/perl@7584
-rw-r--r--utf8.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/utf8.c b/utf8.c
index 5237ac4a1c..8ce0d216a1 100644
--- a/utf8.c
+++ b/utf8.c
@@ -215,7 +215,7 @@ Perl_utf8_to_uv(pTHX_ U8* s, STRLEN curlen, STRLEN* retlen, U32 flags)
if (dowarn)
Perl_warner(aTHX_ WARN_UTF8,
"Malformed UTF-8 character (unexpected non-continuation byte 0x%02"UVxf" after byte 0x%02"UVxf")",
- s[1], uv);
+ (UV)s[1], uv);
goto malformed;
}