| line |
true |
false |
branch |
|
61
|
10 |
7 |
$is_terminal ? :
|
|
64
|
0 |
17 |
if ($node->get_collapsed) { }
|
|
69
|
14 |
3 |
if (my $name = $node->get_name)
|
|
74
|
10 |
4 |
$is_terminal ? :
|
|
89
|
3 |
14 |
if ($r)
|
|
100
|
0 |
17 |
if ($node->get_clade_label)
|
|
101
|
0 |
0 |
unless ($self->_tree->get_meta_object('map:tree_size'))
|
|
187
|
0 |
0 |
if (my $value = $$f{"-$p"}) { }
|
|
192
|
0 |
0 |
if ($value = $node->$method)
|
|
204
|
0 |
0 |
if ($td->get_shape =~ /radial/i) { }
|
|
208
|
0 |
0 |
if (@$desc) { }
|
|
214
|
0 |
0 |
unless defined $radius
|
|
215
|
0 |
0 |
if $h1 >= $radius
|
|
236
|
0 |
0 |
scalar(@$ntips) / $size > 0.5 ? :
|
|
263
|
0 |
0 |
unless defined $x1
|
|
264
|
0 |
0 |
if $x >= $x1
|
|
300
|
0 |
0 |
if ($clado) { }
|
|
311
|
0 |
0 |
if $height > $tallest
|
|
339
|
0 |
0 |
if (my $name = $node->get_name)
|
|
377
|
2 |
1 |
if (my $options = $drawer->get_scale_options)
|
|
385
|
0 |
2 |
if ($options->{'-font'} and ref $options->{'-font'} eq 'HASH')
|
|
402
|
2 |
0 |
if ($width =~ /^(\d+)%$/)
|
|
405
|
0 |
2 |
if (my $units = $options->{'-units'})
|
|
413
|
2 |
0 |
if ($major =~ /^(\d+)%$/)
|
|
416
|
2 |
0 |
if ($minor =~ /^(\d+)%$/)
|
|
419
|
0 |
2 |
if ($blocks and $blocks =~ /^(\d+)%$/)
|
|
424
|
0 |
2 |
$options->{'-reverse'} ? :
|
|
425
|
0 |
2 |
$options->{'-reverse'} ? :
|
|
426
|
0 |
2 |
$options->{'-reverse'} ? :
|
|
444
|
0 |
2 |
if ($options->{'-reverse'}) { }
|
|
446
|
0 |
0 |
unless ($j % sprintf('%.0f', $major / $minor))
|
|
448
|
0 |
0 |
if ($blocks and not scalar(@maji) % 2)
|
|
458
|
22 |
80 |
unless ($j % sprintf('%.0f', $major / $minor))
|
|
460
|
0 |
22 |
if ($blocks and not scalar(@maji) % 2)
|
|
473
|
0 |
2 |
ref $tmpl ? :
|
|
491
|
0 |
102 |
unless $i % $major
|
|
502
|
0 |
2 |
if (@blocksi)
|
|
538
|
14 |
3 |
if (my $parent = $node->get_parent)
|
|
543
|
8 |
6 |
if ($shape =~ /CURVY/i) { }
|
|
|
6 |
0 |
elsif ($shape =~ /RECT/i) { }
|
|
|
0 |
0 |
elsif ($shape =~ /DIAG/i) { }
|
|
|
0 |
0 |
elsif ($shape =~ /UNROOTED/i) { }
|
|
|
0 |
0 |
elsif ($shape =~ /RADIAL/i) { }
|
|
585
|
0 |
0 |
if (my $parent = $node->get_parent)
|
|
610
|
0 |
0 |
if ($parent->get_rotation < $rotation)
|
|
630
|
0 |
0 |
if ($^O =~ /darwin/) { }
|
|
|
0 |
0 |
elsif ($^O =~ /linux/) { }
|
|
|
0 |
0 |
elsif ($^O =~ /MSWin/) { }
|
|
643
|
0 |
0 |
if (-e "$dir/$font.ttf")
|