diff options
-rw-r--r-- | hv.c | 1 | ||||
-rw-r--r-- | hv.h | 3 |
2 files changed, 3 insertions, 1 deletions
@@ -18,6 +18,7 @@ #include "EXTERN.h" #define PERL_IN_HV_C +#define PERL_HASH_INTERNAL_ACCESS #include "perl.h" #define HV_MAX_LENGTH_BEFORE_SPLIT 14 @@ -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; \ |