line |
true |
false |
branch |
22
|
0 |
0 |
if ($funcname eq 'DB::DB') { } |
33
|
0 |
0 |
unless $addr |
47
|
0 |
0 |
unless $op_info |
61
|
0 |
0 |
unless $parent_addr |
69
|
0 |
0 |
unless $op_info |
77
|
0 |
0 |
unless $op_info |
78
|
0 |
0 |
unless (exists $op_info->{'prev_expr'}) |
80
|
0 |
0 |
if ($parent_info) { } |
149
|
0 |
0 |
if (scalar @parent_lines > 1) |
157
|
0 |
0 |
if ($i > 0) |
162
|
0 |
0 |
if (scalar @child_lines > 1) |
233
|
0 |
0 |
if (exists $info->{'position'}) |
247
|
0 |
0 |
$info->{'parent'} ? : |
248
|
0 |
0 |
unless ($parent) |
249
|
0 |
0 |
$candidate_pair ? : |
256
|
0 |
0 |
unless ($parent_info) |
257
|
0 |
0 |
$candidate_pair ? : |
260
|
0 |
0 |
exists $parent_info->{'sep'} ? : |
261
|
0 |
0 |
exists $parent_info->{'texts'} ? : |
266
|
0 |
0 |
if (not exists $parent_info->{'fmt'} and scalar @texts == 1 and eval {
do {
$texts[0]->isa('B::DeparseTree::Node')
}
}) |
271
|
0 |
0 |
if (exists $parent_info->{'fmt'} or exists $parent_info->{'position'}) { } |
296
|
0 |
0 |
unless $next_found_pos |
304
|
0 |
0 |
if ($found_pos) { } |
311
|
0 |
0 |
if (defined $found_pos) |
313
|
0 |
0 |
if ($marked_position) { } |
326
|
0 |
0 |
if $result |
328
|
0 |
0 |
if (ref $text) { } |
329
|
0 |
0 |
if (ref $text eq 'ARRAY' and scalar @$text == 2) { } |
|
0 |
0 |
elsif ($text->{'addr'} == $child_addr) { } |
330
|
0 |
0 |
if ($text->[1] == $child_addr) { } |
335
|
0 |
0 |
if ($i < $text_len) |
349
|
0 |
0 |
if ($i < $text_len) |
368
|
0 |
0 |
if ($start_index >= 0) |
369
|
0 |
0 |
if (index($parent_text, $child_text, $start_index + 1) < 0) |
385
|
0 |
0 |
if ($info) |
389
|
0 |
0 |
if ($info->{'parent'}) |
391
|
0 |
0 |
if ($parent) |
394
|
0 |
0 |
if ($texts) |
410
|
0 |
0 |
unless $info and $info->{'parent'} |
412
|
0 |
0 |
unless $parent |
416
|
0 |
0 |
$info->{'op'}->can('name') ? : |
420
|
0 |
0 |
if ($texts) |
432
|
0 |
0 |
if (ref $info and ref $info->{'texts'} eq 'ARRAY') |
434
|
0 |
0 |
if (ref $child_info) |
435
|
0 |
0 |
if (ref $child_info eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $child_info eq 'B::DeparseTree::Node') { } |
454
|
0 |
0 |
if $a > $b |