ext/B/defsubs.h also depends on the program that builds it

[p5sagit/p5-mst-13.2.git] / ext / B / B.xs

diff --git a/ext/B/B.xs b/ext/B/B.xs
index 0bae084..83c9c4a 100644 (file)
--- a/ext/B/B.xs
+++ b/ext/B/B.xs
@@ -575,7 +575,7 @@ hash(sv)
        U32 hash = 0;
        char hexhash[19]; /* must fit "0xffffffffffffffff" plus trailing \0 */
        s = SvPV(sv, len);
-       PERL_HASH(hash, (U8*)s, len);
+       PERL_HASH(hash, s, len);
        sprintf(hexhash, "0x%"UVxf, (UV)hash);
        ST(0) = sv_2mortal(newSVpv(hexhash, 0));