| line |
true |
false |
branch |
|
178
|
1 |
6 |
if $person1->id eq $person2->id |
|
185
|
5 |
24 |
if $anc1->id eq $anc2->id |
|
230
|
21 |
14 |
if (defined $self->relationship_table->{$person1->gender}[$x][$y]) { } |
|
237
|
32 |
3 |
if $self->abbr |
|
252
|
0 |
32 |
unless $self->abbr |
|
257
|
25 |
7 |
if $count < $self->abbr |
|
291
|
5 |
9 |
if ($x == $y) |
|
295
|
0 |
9 |
if ($x == 0) |
|
299
|
6 |
3 |
if ($x == 1) |
|
303
|
0 |
3 |
if ($y == 0) |
|
307
|
0 |
3 |
if ($y == 1) |
|
311
|
1 |
2 |
if ($x > $y) { } |
|
330
|
0 |
3 |
if $num == 1 |
|
331
|
1 |
2 |
if $num == 2 |
|
353
|
1 |
40 |
if $person1->id eq $person2->id |
|
360
|
39 |
996 |
if $ancestors1[$i]->id eq $ancestors2[$j]->id |
|
383
|
0 |
1 |
unless my $mrca = $self->most_recent_common_ancestor($person1, $person2) |
|
390
|
1 |
1 |
if $_->id eq $mrca->id |
|
395
|
1 |
2 |
if $_->id eq $mrca->id |