Branch Coverage

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


line true false branch
138 53 230 unless ($I->PrecedenceFile)
152 160 596 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) { }
278 248 21 if (defined $I->{'PRECEDENCEORDER'}) { }
287 0 205 unless (defined $ordered{$c})
309 0 709 if (defined $randomized{$random}) { }
327 157 224 if ($tiebreaker eq 'none')
328 17 207 if ($tiebreaker eq 'all')
331 3 204 if ($tiebreaker eq 'borda') { }
3 201 elsif ($tiebreaker eq 'borda_all') { }
66 135 elsif ($tiebreaker eq 'approval') { }
2 133 elsif ($tiebreaker eq 'topcount') { }
2 131 elsif ($tiebreaker eq 'topcount_active') { }
64 67 elsif ($tiebreaker eq 'grandjunction') { }
66 1 elsif ($tiebreaker eq 'precedence') { }
348 52 12 if ($GJ->{'winner'}) { }
12 0 elsif ($GJ->{'tie'}) { }
361 83 95 if ($counted->{$c} > $highest) { }
80 15 elsif ($counted->{$c} == $highest) { }
378 36 40 if (@highchoice > 1 and $I->TieBreakerFallBackPrecedence)
387 2 36 unless defined $active
401 133 122 if $T{$leader} == $best
412 3 54 unless ($I->TieBreakerFallBackPrecedence or lc $I->TieBreakMethod eq 'precedence')
424 3 51 if lc $ranking1 eq 'precedence'
427 1 1 $ranking1 ? :
432 1 0 $ranking2 ? :
438 110 67 if (1 == @{$RC1->{$level}}) { }
26 41 elsif ($ranking2 eq 'precedence') { }