tweaks to enable PERL_OBJECT to build & test on win32

p4raw-id: //depot/perl@1879

1 files changed, 3 insertions, 3 deletions

diff --git a/util.c b/util.c
index 5be4969e75..fd99576b7d 100644
--- a/util.c
+++ b/util.c
@@ -897,14 +897,14 @@ mem_collxfrm(const char *s, STRLEN len, STRLEN *xlen)
 void
 fbm_compile(SV *sv, U32 flags /* not used yet */)
 {
-    register unsigned char *s;
-    register unsigned char *table;
+    register U8 *s;
+    register U8 *table;
     register U32 i;
     STRLEN len;
     I32 rarest = 0;
     U32 frequency = 256;
 
-    s = SvPV_force(sv, len);
+    s = (U8*)SvPV_force(sv, len);
     sv_upgrade(sv, SVt_PVBM);
     if (len > 255 || len == 0)	/* TAIL might be on on a zero-length string. */
 	return;			/* can't have offsets that big */