X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2FEncode.xs;h=1c0de8c53677be107fd081e003b7faa46e7fbdd7;hb=cc7dbc11d7cd9ed68bb2fbc677f60586de194a05;hp=0462a5d62aa27b2a4cec7488977f1e23201564b3;hpb=3292f4263d4135b93f4022a8bad55fc98397b523;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Encode/Encode.xs b/ext/Encode/Encode.xs
index 0462a5d..1c0de8c 100644
--- a/ext/Encode/Encode.xs
+++ b/ext/Encode/Encode.xs
@@ -1,5 +1,5 @@
 /*
- $Id: Encode.xs,v 1.53 2003/02/06 01:52:11 dankogai Exp dankogai $
+ $Id: Encode.xs,v 1.54 2003/02/20 14:42:34 dankogai Exp dankogai $
  */
 
 #define PERL_NO_GET_CONTEXT
@@ -74,7 +74,7 @@ encode_method(pTHX_ encode_t * enc, encpage_t * dir, SV * src,
     STRLEN dlen = SvLEN(dst)-1;
     int code = 0;
     STRLEN trmlen = 0;
-    U8 *trm = term ? SvPV(term, trmlen) : NULL;
+    U8 *trm = term ? (U8*) SvPV(term, trmlen) : NULL;
 
     if (offset) {
       s += *offset;