From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 17 Apr 2002 14:19:07 +0000 (+0000)
Subject: More signedness nits.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=35a51b2056f806b70a212f2c12a7cf3433732011;p=p5sagit%2Fp5-mst-13.2.git

More signedness nits.

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

diff --git a/ext/Encode/Encode.xs b/ext/Encode/Encode.xs
index 9c30c4a..a7a6eba 100644
--- a/ext/Encode/Encode.xs
+++ b/ext/Encode/Encode.xs
@@ -196,7 +196,7 @@ encode_method(pTHX_ encode_t * enc, encpage_t * dir, SV * src,
 		    if (!check) { /* fallback char */
 			sdone += slen + clen;
 		        ddone += dlen + enc->replen; 
-		        sv_catpvn(dst, enc->rep, enc->replen); 
+		        sv_catpvn(dst, (char*)enc->rep, enc->replen); 
 		    }
                     else if (check == -1){ /* perlqq */
 		        SV* perlqq = 
@@ -235,8 +235,8 @@ encode_method(pTHX_ encode_t * enc, encpage_t * dir, SV * src,
 		}
 	    }
 	    dlen = SvCUR(dst); 
-	    d   = SvPVX(dst) + dlen; 
-	    s   = SvPVX(src) + sdone; 
+	    d   = (U8*)SvPVX(dst) + dlen; 
+	    s   = (U8*)SvPVX(src) + sdone; 
 	    slen = tlen - sdone;
 	    break;