| line |
true |
false |
branch |
|
47
|
27 |
4 |
if $WRAPPER_INSTALLED |
|
62
|
31 |
0 |
if (($format // "") eq "ascii" and not $self->{'_introspect_captured'}) |
|
72
|
0 |
31 |
if (@$label > 0) |
|
77
|
0 |
0 |
if $label_pos eq "top" |
|
83
|
0 |
0 |
if length $l > $max_x + 2 |
|
98
|
186 |
0 |
$c->can('name') ? : |
|
135
|
2 |
68 |
unless $port |
|
140
|
18 |
0 |
if $px > $x2 and $py >= $y1 and $py <= $y2 |
|
141
|
16 |
0 |
if $px < $x1 and $py >= $y1 and $py <= $y2 |
|
142
|
17 |
0 |
if $py > $y2 and $px >= $x1 and $px <= $x2 |
|
143
|
17 |
0 |
if $py < $y1 and $px >= $x1 and $px <= $x2 |
|
164
|
0 |
110 |
unless defined $att and ref $att eq "HASH" |
|
171
|
0 |
54 |
unless defined $val |
|
172
|
0 |
54 |
if ref $val |
|
173
|
19 |
35 |
if $val eq "" |
|
187
|
0 |
31 |
unless defined $att and ref $att eq "HASH" |
|
190
|
0 |
31 |
unless defined $graph_att and ref $graph_att eq "HASH" |
|
197
|
0 |
53 |
unless defined $val |
|
198
|
0 |
53 |
if ref $val |
|
199
|
0 |
53 |
if $val eq "" |
|
220
|
34 |
1 |
unless $f eq $t |
|
229
|
33 |
36 |
if exists $component{$name} |
|
236
|
1 |
69 |
if exists $component{$n} |
|
240
|
6 |
63 |
unless $adj{$n} |
|
266
|
0 |
3 |
unless $a->from->name cmp $b->from->name |
|
288
|
0 |
6 |
unless $tl and $br |
|
323
|
36 |
100 |
if $side eq "right" |
|
324
|
32 |
68 |
if $side eq "left" |
|
325
|
34 |
34 |
if $side eq "bottom" |
|
326
|
34 |
0 |
if $side eq "top" |
|
342
|
0 |
0 |
unless $self->{'cells'} |
|
351
|
1 |
34 |
if $self->from->name eq $self->to->name |
|
359
|
2 |
17 |
unless $cx > $x2 and $cy >= $y1 and $cy <= $y2 or $cx < $x1 and $cy >= $y1 and $cy <= $y2 or $cy > $y2 and $cx >= $x1 and $cx <= $x2 |
|
363
|
0 |
34 |
unless $self->{'cells'} |
|
365
|
0 |
34 |
unless @adjacent |
|
386
|
1 |
34 |
if $self->from->name eq $self->to->name |
|
394
|
19 |
0 |
unless $cx > $x2 and $cy >= $y1 and $cy <= $y2 or $cx < $x1 and $cy >= $y1 and $cy <= $y2 or $cy > $y2 and $cx >= $x1 and $cx <= $x2 |
|
398
|
0 |
34 |
unless $self->{'cells'} |
|
400
|
0 |
34 |
unless @adjacent |
|
421
|
0 |
35 |
unless $self->{'cells'} |
|
425
|
15 |
22 |
if $end == 64 |
|
426
|
3 |
19 |
if $end == 16 |
|
427
|
14 |
5 |
if $end == 128 |
|
428
|
0 |
5 |
if $end == 32 |
|
456
|
0 |
31 |
if ($@) |
|
473
|
36 |
207 |
if scalar @$row > $total_width |
|
506
|
29 |
2 |
$r ? : |
|
|
31 |
0 |
defined $r ? : |
|
510
|
0 |
31 |
defined $l && $l ne '' ? : |
|
528
|
69 |
0 |
defined $l && $l ne '' ? : |
|
529
|
0 |
69 |
eval {
do {
$node->isa('Graph::Easy::Node::Anon')
}
} ? : |
|
576
|
1 |
34 |
$from->name eq $to->name ? : |
|
580
|
0 |
35 |
if ref($edge) =~ /Bidirectional/i |
|
581
|
1 |
34 |
if not $b and eval {
do {
$edge->bidirectional
}
} // 0 |
|
593
|
0 |
35 |
unless $mult_groups{$key} |
|
595
|
1 |
34 |
defined $l && $l ne '' ? : |
|
605
|
2 |
68 |
unless $port |
|
621
|
0 |
35 |
unless $edge->{'cells'} |
|
625
|
35 |
2 |
$type & 4096 ? : |
|
629
|
35 |
2 |
if ($is_label and not defined $label_x) |
|
662
|
1 |
33 |
if (not $is_self_loop and $from_port and @path > 1) |
|
667
|
0 |
1 |
unless (exists $by_pos{$start_key}) |
|
672
|
0 |
0 |
if (exists $by_pos{$k}) |
|
690
|
10 |
2 |
unless exists $by_pos{$nk} and not $visited{$nk} |
|
695
|
1 |
2 |
unless defined $next |
|
699
|
1 |
0 |
if @sorted == @path |
|
719
|
34 |
1 |
unless ($is_self_loop) |
|
721
|
34 |
0 |
if $from_side ne "unknown" |
|
723
|
34 |
0 |
if $to_side ne "unknown" |
|
742
|
34 |
3 |
if $is_straight_type{$p->{'type'}} |
|
755
|
2 |
35 |
$i > 0 ? : |
|
757
|
34 |
3 |
if ($is_straight_type{$p->{'type'}}) { } |
|
759
|
1 |
33 |
$ci + 1 < $#wp ? : |
|
769
|
1 |
2 |
if $prev_straight |
|
771
|
2 |
1 |
$ci + 1 < $#wp ? : |
|
781
|
2 |
1 |
unless $prev_straight |
|
829
|
0 |
9 |
unless $n |
|
833
|
6 |
3 |
if not defined $bx1 or $nx1 < $bx1 |
|
834
|
6 |
3 |
if not defined $by1 or $ny1 < $by1 |
|
835
|
7 |
2 |
if not defined $bx2 or $nx2 > $bx2 |
|
836
|
8 |
1 |
if not defined $by2 or $ny2 > $by2 |
|
847
|
6 |
0 |
defined $l && $l ne '' ? : |
|
860
|
6 |
0 |
$gcb ? : |
|
|
6 |
0 |
$gcb ? : |
|
|
6 |
0 |
$gcb ? : |
|
|
6 |
0 |
$gcb ? : |
|
878
|
34 |
1 |
if ($e_ast->{'from_port'}) |
|
893
|
34 |
1 |
if ($e_ast->{'to_port'}) |
|
936
|
6 |
63 |
scalar @{$n_ast->{'edges_in'};} == 0 && scalar @{$n_ast->{'edges_out'};} == 0 ? : |
|
944
|
0 |
9 |
unless defined $idx |
|
956
|
69 |
117 |
if ($cp->{'ref'} =~ /::Node$/) { } |
|
|
37 |
80 |
elsif ($cp->{'ref'} =~ /Edge/) { } |
|
|
80 |
0 |
elsif ($cp->{'ref'} =~ /Group/) { } |
|
|
0 |
0 |
elsif ($cp->{'ref'} =~ /Node::Cell/) { } |