X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=ext%2FEncode%2FEncode.xs;h=05ff8360502d497e78bd5453dbe628a39afc51bd;hb=64ffdd5e3070e2601e8355984407a490ea080833;hp=e4f7b10cbd633e9356087cceb5a7c74c69b46b4e;hpb=2655a377318baf22d2b1bf2d113f47ce1c4af14d;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/ext/Encode/Encode.xs b/ext/Encode/Encode.xs
index e4f7b10..05ff836 100644
--- a/ext/Encode/Encode.xs
+++ b/ext/Encode/Encode.xs
@@ -581,7 +581,7 @@ encode_method(pTHX_ encode_t * enc, encpage_t * dir, SV * src,
 		   SvOOK would be ideal - but sv_backoff does not understand SvLEN == 0
 		   type SVs and sv_clear() calls it ...
 		 */
-		sv_setpvn(src,s+slen,sdone);
+		 sv_setpvn(src, (char*)s+slen, sdone);
 #else
 		Move(s + slen, SvPVX(src), sdone , U8);
 #endif