From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 9 Oct 2006 16:54:12 +0000 (+0300)
Subject: Encode.xs: add an explicit cast to make g++ happier
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1b9a72a9dfc4967e4463f087bcdbe76648d6654c;p=p5sagit%2Fp5-mst-13.2.git

Encode.xs: add an explicit cast to make g++ happier
Message-Id: <20061009135412.47F7A8B3A0@seth.hut.fi>

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

diff --git a/ext/Encode/Encode.xs b/ext/Encode/Encode.xs
index 72a686c..895819b 100644
--- a/ext/Encode/Encode.xs
+++ b/ext/Encode/Encode.xs
@@ -333,7 +333,7 @@ process_utf8(pTHX_ SV* dst, U8* s, U8* e, int check,
                                );
 #if 1 /* perl-5.8.6 and older do not check UTF8_ALLOW_LONG */
         if (strict && uv > PERL_UNICODE_MAX)
-        ulen = -1;
+        ulen = (STRLEN) -1;
 #endif
             if (ulen == -1) {
                 if (strict) {