diff options
| author | Yves Orton <demerphq@gmail.com> | 2021-02-12 23:13:56 +0100 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2021-02-13 09:13:40 +0100 |
| commit | f43079cb514e3d0be0036424695438ae3fb58451 (patch) | |
| tree | a695e7b888b0a068c86b99c2dd390b5f2cc3ee6a /perlvars.h | |
| parent | 64901762e5e760756c8a2f3d72e81a16d2213c53 (diff) | |
| download | perl-f43079cb514e3d0be0036424695438ae3fb58451.tar.gz | |
[#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.
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 4 |
1 files changed, 2 insertions, 2 deletions
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 */ |