Branch Coverage

blib/lib/Vote/Count/TieBreaker.pm
Criterion Covered Total %
branch 62 66 93.9


line true false branch
129 3 62 unless ($I->PrecedenceFile)
143 143 591 if $depth > $deepest
149 360 990 unless my $pick = $ballots->{$b}{'votes'}[$round - 1]
150 222 768 if (defined $current{$pick})
159 75 221 if ($current{$c} < $max)
165 52 76 if (1 == @tiedchoices)
171 3 13 if ($self->TieBreakerFallBackPrecedence) { }
229 26 8 if (defined $I->{'PRECEDENCEORDER'}) { }
238 0 82 unless (defined $ordered{$c})
260 0 325 if (defined $randomized{$random}) { }
276 157 102 if ($tiebreaker eq 'none')
277 17 85 if ($tiebreaker eq 'all')
280 3 82 if ($tiebreaker eq 'borda') { }
3 79 elsif ($tiebreaker eq 'borda_all') { }
12 67 elsif ($tiebreaker eq 'approval') { }
2 65 elsif ($tiebreaker eq 'topcount') { }
62 3 elsif ($tiebreaker eq 'grandjunction') { }
2 1 elsif ($tiebreaker eq 'precedence') { }
294 50 12 if ($GJ->{'winner'}) { }
12 0 elsif ($GJ->{'tie'}) { }
307 24 42 if ($counted->{$c} > $highest) { }
37 5 elsif ($counted->{$c} == $highest) { }
324 11 9 if (@highchoice > 1)
325 8 3 if ($I->TieBreakerFallBackPrecedence)
334 8 20 if lc $method eq 'precedence'
335 2 18 unless ($I->TieBreakerFallBackPrecedence or $I->TieBreakMethod eq 'precedence')
339 0 18 if scalar @tied == 1
349 27 11 1 == @{$RC->{$level};} ? :
357 1 13 if (lc $method1 eq 'precedence')
362 7 6 if 1 == $I->TieBreakerFallBackPrecedence
363 9 4 if lc $method2 eq 'precedence'
364 1 12 unless ($hasprecedence)
374 49 15 1 == @{$first->{$level};} ? :