Branch Coverage

blib/lib/Vote/Count/TieBreaker.pm
Criterion Covered Total %
branch 60 64 93.7


line true false branch
138 53 236 unless ($I->PrecedenceFile)
152 137 619 if $depth > $deepest
158 392 1024 unless my $pick = $ballots->{$b}{'votes'}[$round - 1]
159 227 797 if (defined $current{$pick})
168 76 232 if ($current{$c} < $max)
174 53 81 if (1 == @tiedchoices)
180 4 13 if ($self->TieBreakerFallBackPrecedence) { }
281 287 25 if (defined $I->{'PRECEDENCEORDER'}) { }
290 0 253 unless (defined $ordered{$c})
312 0 709 if (defined $randomized{$random}) { }
330 157 260 if ($tiebreaker eq "none")
331 17 243 if ($tiebreaker eq "all")
334 3 240 if ($tiebreaker eq 'borda') { }
3 237 elsif ($tiebreaker eq 'borda_all') { }
66 171 elsif ($tiebreaker eq 'approval') { }
2 169 elsif ($tiebreaker eq 'topcount') { }
2 167 elsif ($tiebreaker eq 'topcount_active') { }
64 103 elsif ($tiebreaker eq 'grandjunction') { }
102 1 elsif ($tiebreaker eq 'precedence') { }
351 52 12 if ($GJ->{'winner'}) { }
12 0 elsif ($GJ->{'tie'}) { }
364 85 93 if ($counted->{$c} > $highest) { }
80 13 elsif ($counted->{$c} == $highest) { }
381 36 40 if (@highchoice > 1 and $I->TieBreakerFallBackPrecedence)
390 3 36 unless defined $active
404 144 131 if $T{$leader} == $best
415 3 55 unless ($I->TieBreakerFallBackPrecedence or lc $I->TieBreakMethod eq "precedence")
427 3 52 if lc $ranking1 eq "precedence"
430 1 1 $ranking1 ? :
435 1 0 $ranking2 ? :
441 111 70 if (1 == @{$RC1->{$level}}) { }
26 44 elsif ($ranking2 eq 'precedence') { }