Skip Menu |

This queue is for tickets about the List-Cycle CPAN distribution.

Report information
The Basics
Id: 81762
Status: resolved
Priority: 0/
Queue: List-Cycle

People
Owner: Nobody in particular
Requestors: ANDK [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 1.00
Fixed in: (no value)



Subject: Test failures due to hash randomisation in perl 5.17.6
Since bleadperl v5.17.5-518-g7dc8663 your tests are failing frequently. That commit introduced hash key randomization and it seems at least the test t/dump.t is hit by that. Find a sample fail report at: http://www.cpantesters.org/cpan/report/57db26fe-32d2-11e2-93c1-12b6a290f8f5 You can read more about the change at http://perl5.git.perl.org/perl.git/commit/7dc8663964c66a698d31bbdc8e8abed69bddeec3 or at http://www.perlmonks.org/?node_id=1005122 You may have to run the test several times until the randomization causes a fail. HTH&&Thanks&&Regards,
Hi Andy See attached - A new dump.t.
Subject: dump.t
#!perl -Tw use Test::More tests => 3; BEGIN { use_ok( 'List::Cycle' ); } my $cycle = List::Cycle->new( {vals=> [2112, 5150, 90125]} ); isa_ok( $cycle, 'List::Cycle' ); my $expected = <<END_DUMP; pointer => 0 values => 2112,5150,90125 END_DUMP # We do this because it's dumped by unordered hash. my @got = sort split /\n/, $cycle->dump; # Now that we're sure $got[1] contains 'values => ...', # we can sort the values themselves. my @field = split(/\s*=>\s*/, $got[1]); $got[1] = "$field[0] => " . join(',', sort split(/\s*,\s*/, $field[1]) ); my $got = join("\n", @got) . "\n"; is($expected, $got, 'dumped properly');
Fixed in 1.02. Thanks!