From: Yitzchak Scott-Thoennes <sthoenna@efn.org>
Date: Mon, 6 Nov 2000 15:19:05 +0000 (-0800)
Subject: Varargs don't always work too well if one puts an unsigned
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=9e29e5ff005da001be364f21377fa2a6364952d5;p=p5sagit%2Fp5-mst-13.2.git

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
---

diff --git a/utf8.c b/utf8.c
index 5237ac4..8ce0d21 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;
     }