export PerlIOBuf_get_base for win32 extension linkage

[p5sagit/p5-mst-13.2.git] / hv.h

diff --git a/hv.h b/hv.h
index 6dc0a88..4979fdd 100644 (file)
--- a/hv.h
+++ b/hv.h
@@ -52,7 +52,7 @@ struct xpvhv {
 /* (http://burtleburtle.net/bob/hash/doobs.html) */
 #define PERL_HASH(hash,str,len) \
      STMT_START        { \
-       register const char *s_PeRlHaSh = str; \
+       register const unsigned char *s_PeRlHaSh = str; \
        register I32 i_PeRlHaSh = len; \
        register U32 hash_PeRlHaSh = 0; \
        while (i_PeRlHaSh--) { \