Author: stevehay Date: Tue Apr 20 13:55:29 2021 New Revision: 1889014 URL: http://svn.apache.org/viewvc?rev=1889014&view=rev Log: Fix build for perl >= 5.33.7
Patch by Leon Timmermans <faw...@gmail.com> from https://github.com/Perl/perl5/issues/18617 Modified: perl/modperl/trunk/src/modules/perl/modperl_perl.c Modified: perl/modperl/trunk/src/modules/perl/modperl_perl.c URL: http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/modperl_perl.c?rev=1889014&r1=1889013&r2=1889014&view=diff ============================================================================== --- perl/modperl/trunk/src/modules/perl/modperl_perl.c (original) +++ perl/modperl/trunk/src/modules/perl/modperl_perl.c Tue Apr 20 13:55:29 2021 @@ -268,7 +268,7 @@ void modperl_hash_seed_set(pTHX) #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;
