Avoid warning with MS Visual C compiler.

Encode.xs(443) : warning C4761: integral size mismatch in argument; conversion supplied

p4raw-id: //depot/perl@26922

diff --git a/ext/Encode/Encode.xs b/ext/Encode/Encode.xs
index 6cc4a6a..b60ead4 100644 (file)
--- a/ext/Encode/Encode.xs
+++ b/ext/Encode/Encode.xs
@@ -412,14 +412,14 @@ CODE:
     /* 
      * PerlIO check -- we assume the object is of PerlIO if renewed
      */
-    int renewed = 0;
+    bool renewed = 0;
     dSP; ENTER; SAVETMPS;
     PUSHMARK(sp);
     XPUSHs(obj);
     PUTBACK;
     if (call_method("renewed",G_SCALAR) == 1) {
        SPAGAIN;
-       renewed = POPi;
+       renewed = (bool)POPi;
        PUTBACK; 
 #if 0
        fprintf(stderr, "renewed == %d\n", renewed);