perl-5.18.patch

   1 +++ mod_perl-2.0.7-svn1448242/src/modules/perl/modperl_perl.c   2013-02-20 08:54:50.000000000 +0100
   2 --- mod_perl-2.0.8/src/modules/perl/modperl_perl.c      2013-03-26 06:04:00.000000000 +0100
   3 @@ -265,12 +265,17 @@
   4  {
   5  #ifdef MP_NEED_HASH_SEED_FIXUP
   6      if (MP_init_hash_seed_set) {
   7 -#if MP_PERL_VERSION(5, 8, 1)
   8 -        PL_hash_seed       = MP_init_hash_seed;
   9 +#if MP_PERL_VERSION_AT_LEAST(5, 17, 6)
  10 +        memcpy(&PL_hash_seed, &MP_init_hash_seed,
  11 +                sizeof(PL_hash_seed) > sizeof(MP_init_hash_seed) ?
  12 +                    sizeof(MP_init_hash_seed) : sizeof(PL_hash_seed));
  13          PL_hash_seed_set   = MP_init_hash_seed_set;
  14 -#else
  15 +#elif MP_PERL_VERSION_AT_LEAST(5, 8, 2)
  16          PL_rehash_seed     = MP_init_hash_seed;
  17          PL_rehash_seed_set = MP_init_hash_seed_set;
  18 +#else
  19 +        PL_hash_seed       = MP_init_hash_seed;
  20 +        PL_hash_seed_set   = MP_init_hash_seed_set;
  21  #endif
  22      }
  23  #endif