mod_perl2 will require access to the Plan C hashing function.
Nicholas Clark [Sat, 1 Nov 2003 15:21:23 +0000 (15:21 +0000)]
p4raw-id: //depot/perl@21607

hv.h

diff --git a/hv.h b/hv.h
index 5f83440..ee6d192 100644 (file)
--- a/hv.h
+++ b/hv.h
@@ -89,7 +89,7 @@ struct xpvhv {
        (hash) = (hash_PeRlHaSh + (hash_PeRlHaSh << 15)); \
     } STMT_END
 
-#ifdef PERL_IN_HV_C
+#if defined (PERL_IN_HV_C) || defined (MOD_PERL)
 #define PERL_HASH_INTERNAL(hash,str,len) \
      STMT_START        { \
        register const char *s_PeRlHaSh_tmp = str; \