From f43079cb514e3d0be0036424695438ae3fb58451 Mon Sep 17 00:00:00 2001 From: Yves Orton Date: Fri, 12 Feb 2021 23:13:56 +0100 Subject: [#18555] Ensure that PL_hash_seed and PL_hash_state are word aligned Replace PL_hash_seed and PL_hash_state with PL_hash_seed_w and PL_hash_state_w, and replace the old vars with defines that cast their replacements appropriately. This should force linkers to word align the data. --- perlvars.h | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perlvars.h') diff --git a/perlvars.h b/perlvars.h index 0518c0fe4a..c4a08e038b 100644 --- a/perlvars.h +++ b/perlvars.h @@ -264,9 +264,9 @@ PERLVAR(G, malloc_mutex, perl_mutex) /* Mutex for malloc */ #endif PERLVARI(G, hash_seed_set, bool, FALSE) /* perl.c */ -PERLVARA(G, hash_seed, PERL_HASH_SEED_BYTES, unsigned char) /* perl.c and hv.h */ +PERLVARA(G, hash_seed_w, PERL_HASH_SEED_WORDS, __PERL_HASH_WORD_TYPE) /* perl.c and hv.h */ #if defined(PERL_HASH_STATE_BYTES) -PERLVARA(G, hash_state, PERL_HASH_STATE_BYTES, unsigned char) /* perl.c and hv.h */ +PERLVARA(G, hash_state_w, PERL_HASH_STATE_WORDS, __PERL_HASH_WORD_TYPE) /* perl.c and hv.h */ #endif #if defined(PERL_USE_SINGLE_CHAR_HASH_CACHE) PERLVARA(G, hash_chars, (1+256) * sizeof(U32), unsigned char) /* perl.c and hv.h */ -- cgit v1.2.1