X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=hv.h;h=81044c9097c9a753bcb32155e5e4fa2b299da137;hb=59910b6dbc5bdf043d9f33f40bbbc9957f008770;hp=0fcda5e30db1911e65afd2fe3ff8802cbf0a86cf;hpb=008fb0c0b128e68050936412d62bf4def14fc864;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/hv.h b/hv.h
index 0fcda5e..81044c9 100644
--- a/hv.h
+++ b/hv.h
@@ -89,7 +89,8 @@ struct xpvhv {
 	(hash) = (hash_PeRlHaSh + (hash_PeRlHaSh << 15)); \
     } STMT_END
 
-#if defined (PERL_IN_HV_C) || defined (MOD_PERL)
+/* Only hv.c and mod_perl should be doing this.  */
+#ifdef PERL_HASH_INTERNAL_ACCESS
 #define PERL_HASH_INTERNAL(hash,str,len) \
      STMT_START	{ \
 	register const char *s_PeRlHaSh_tmp = str; \