--- Convert-BER-XS/XS.xs	2019/04/20 02:12:27	1.9
+++ Convert-BER-XS/XS.xs	2019/04/20 11:12:47	1.10
@@ -161,7 +161,7 @@
   return SvPVX (sv)[idx];
 }
 
-static int
+static void
 profile_set (profile_type *profile, int klass, int tag, int type)
 {
   SV *sv = (SV *)profile;
@@ -559,7 +559,7 @@
 {
   STRLEN len;
   buf_sv = sv;
-  buf = SvPVbyte (buf_sv, len);
+  buf = (U8  *)SvPVbyte (buf_sv, len);
   cur = buf;
   end = buf + len;
 }
@@ -583,7 +583,7 @@
   if (expect_false ((uintptr_t)(end - cur) < len))
     {
       STRLEN pos = cur - buf;
-      buf = my_sv_grow (buf_sv, pos, len);
+      buf = (U8 *)my_sv_grow (buf_sv, pos, len);
       cur = buf + pos;
       end = buf + SvLEN (buf_sv) - 1;
     }
@@ -819,7 +819,7 @@
   while (uchars--)
     {
       STRLEN uclen;
-      UV uchr = utf8_to_uvchr_buf (ptr, ptr + len, &uclen);
+      UV uchr = utf8_to_uvchr_buf ((U8 *)ptr, (U8 *)ptr + len, &uclen);
 
       ptr += uclen;
       len -= uclen;
@@ -1030,7 +1030,7 @@
 {
         cur_profile = SvPROFILE (profile);
 	STRLEN len;
-        buf = SvPVbyte (ber, len);
+        buf = (U8 *)SvPVbyte (ber, len);
         cur = buf;
         end = buf + len;