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 (file)
--- 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) {