commit | 916376b4559d194ca618ce52c5a937fb000350be | [log] [tgz] |
---|---|---|
author | Steve Hay <stevehay@apache.org> | Tue Apr 20 13:55:29 2021 +0000 |
committer | Steve Hay <stevehay@apache.org> | Tue Apr 20 13:55:29 2021 +0000 |
tree | d101d1fbcd94d44c81fe64b39db79ca3b8993ec9 | |
parent | 0537fc994f27c6b655fe27dc78bda13bda1f6664 [diff] |
Fix build for perl >= 5.33.7 Patch by Leon Timmermans <fawaka@gmail.com> from https://github.com/Perl/perl5/issues/18617 git-svn-id: https://svn.apache.org/repos/asf/perl/modperl/trunk@1889014 13f79535-47bb-0310-9956-ffa450edef68
diff --git a/src/modules/perl/modperl_perl.c b/src/modules/perl/modperl_perl.c index fe0f484..9ec744f 100644 --- a/src/modules/perl/modperl_perl.c +++ b/src/modules/perl/modperl_perl.c
@@ -268,7 +268,7 @@ #ifdef MP_NEED_HASH_SEED_FIXUP if (MP_init_hash_seed_set) { #if MP_PERL_VERSION_AT_LEAST(5, 17, 6) - memcpy(&PL_hash_seed, &MP_init_hash_seed, + memcpy(PL_hash_seed, &MP_init_hash_seed, sizeof(PL_hash_seed) > sizeof(MP_init_hash_seed) ? sizeof(MP_init_hash_seed) : sizeof(PL_hash_seed)); PL_hash_seed_set = MP_init_hash_seed_set;