blob: b35f476eb8802d72f093418dd8f8f28867e83506 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
------------------------------------------------------------------------
r1889014 | stevehay | 2021-04-20 15:55:29 +0200 (Út, 20 dub 2021) | 3 lines
Fix build for perl >= 5.33.7
Patch by Leon Timmermans <fawaka@gmail.com> from https://github.com/Perl/perl5/issues/18617
Index: src/modules/perl/modperl_perl.c
===================================================================
--- ./src/modules/perl/modperl_perl.c (revision 1889013)
+++ ./src/modules/perl/modperl_perl.c (revision 1889014)
@@ -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;
------------------------------------------------------------------------
|