| line |
true |
false |
branch |
|
23
|
0 |
0 |
unless exists $self->{$field} |
|
25
|
0 |
0 |
unless defined $data |
|
27
|
0 |
0 |
if ($field eq 'addr' or $field eq 'parent') { } |
|
|
0 |
0 |
elsif ($field eq 'cop') { } |
|
|
0 |
0 |
elsif ($field eq 'indexes') { } |
|
|
0 |
0 |
elsif ($field eq 'op') { } |
|
|
0 |
0 |
elsif ($field eq 'prev_expr') { } |
|
|
0 |
0 |
elsif ($field eq 'texts' or $field eq 'other_ops') { } |
|
30
|
0 |
0 |
if (defined $data) |
|
32
|
0 |
0 |
if $data->can('name') |
|
37
|
0 |
0 |
if (@lines < 4) { } |
|
44
|
0 |
0 |
if $data->can('name') |
|
50
|
0 |
0 |
if (not @$data) { } |
|
57
|
0 |
0 |
if (ref $item eq 'B::DeparseTree::TreeNode') { } |
|
173
|
23408 |
2607 |
if (ref $op) |
|
174
|
0 |
23408 |
if (ref $op eq 'B::DeparseTree') { } |
|
189
|
1 |
26014 |
if defined $sep |
|
190
|
12236 |
13779 |
if (ref $data) { } |
|
|
13779 |
0 |
elsif (defined $data) { } |
|
193
|
1 |
12235 |
if defined $sep |
|
208
|
7000 |
175105 |
if $opts->{$optname} |
|
210
|
1313 |
24702 |
if (exists $self->{'other_ops'}) |
|
212
|
0 |
1313 |
unless (ref $ary eq 'ARRAY') |
|
217
|
0 |
1944 |
if ($other_addr == $addr) |
|
223
|
1564 |
24451 |
if ($opts->{'maybe_parens'}) |
|
229
|
38 |
1526 |
$parens ? : |
|
232
|
0 |
1564 |
if exists $self->{'text'} and $parens |
|
242
|
0 |
0 |
if (&parens_test($info, $cx, $prec)) { } |
|
245
|
0 |
0 |
if ($cx == 16) { } |