diff options
author | Yves Orton <demerphq@gmail.com> | 2017-03-23 11:54:43 +0100 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2017-04-23 11:44:18 +0200 |
commit | dd1b95f812312c85390f487887cdd55282fcd6ce (patch) | |
tree | e1dc4cde23d1a15369a39f1d268d5c31ead0ff90 /util.c | |
parent | 259e968485f855f70472c8be9267efceca42b0fb (diff) | |
download | perl-dd1b95f812312c85390f487887cdd55282fcd6ce.tar.gz |
get rid of USE_HASH_SEED_EXPLICIT
I think this has been outright broken for a long time, and it
doesnt make any sense to since mandatory randomization anyway,
so simply remove it.
Diffstat (limited to 'util.c')
-rw-r--r-- | util.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -4632,7 +4632,6 @@ Perl_get_hash_seed(pTHX_ unsigned char * const seed_buffer) env_pv= PerlEnv_getenv("PERL_HASH_SEED"); if ( env_pv ) -# ifndef USE_HASH_SEED_EXPLICIT { /* ignore leading spaces */ while (isSPACE(*env_pv)) @@ -4667,8 +4666,7 @@ Perl_get_hash_seed(pTHX_ unsigned char * const seed_buffer) /* should we warn about insufficient hex? */ } else -# endif -#endif +#endif /* NO_PERL_HASH_ENV */ { (void)seedDrand01((Rand_seed_t)seed()); |