On Sat Mar 12 16:56:37 2016, SREZIC wrote:
Show quoted text> If perl is compiled with -Duselongdouble, then t/01base.t may fail
> randomly, probably due to hash randomization. At least if I run
>
> for i in $(seq 100); do echo -n "$i "; env PERL_HASH_SEED=$i
> PERL_PERTURB_KEYS=NO /opt/perl-5.20.1D/bin/prove -b t/01base.t
> >&/dev/null && echo pass || echo fail; done
>
> twice, then the same fail/pass pattern happens.
Thanks for your report, but I cannot repro this in OS X with a -Duselongdouble Perl.
Looking at the code I do not see how hash ordering could affect the result. The key is the index() sub, and while it does do 'keys' (without sorting) and 'values', I off-hand cannot see that this should matter, because what it does is sums.
And furthermore, I don't see how longdouble or not should make a difference for (just) the base01.t failing.
Could you debug a little bit more?