fix build issue with picky compilers
authorYves Orton <demerphq@gmail.com>
Tue, 7 May 2013 09:22:22 +0000 (11:22 +0200)
committerYves Orton <demerphq@gmail.com>
Tue, 7 May 2013 10:05:32 +0000 (12:05 +0200)
ext/Hash-Util/Util.xs

index 33bce41..f40d1e2 100644 (file)
@@ -89,7 +89,7 @@ hash_traversal_mask(rhv, ...)
 {
 #ifdef PERL_HASH_RANDOMIZE_KEYS
     if (SvROK(rhv) && SvTYPE(SvRV(rhv))==SVt_PVHV && !SvMAGICAL(SvRV(rhv))) {
-        const HV * const hv = (const HV *) SvRV(rhv);
+        HV *hv = SvRV(rhv);
         if (items>1) {
             hv_rand_set(hv, SvUV(ST(1)));
         }