line |
true |
false |
branch |
23
|
0 |
0 |
if ($funcname eq 'DB::DB') { } |
34
|
0 |
0 |
unless $addr |
48
|
0 |
0 |
unless $op_info |
62
|
0 |
0 |
unless $parent_addr |
70
|
0 |
0 |
unless $op_info |
78
|
0 |
0 |
unless $op_info |
79
|
0 |
0 |
unless (exists $op_info->{'prev_expr'}) |
81
|
0 |
0 |
if ($parent_info) { } |
150
|
0 |
0 |
if (scalar @parent_lines > 1) |
158
|
0 |
0 |
if ($i > 0) |
163
|
0 |
0 |
if (scalar @child_lines > 1) |
234
|
0 |
0 |
if (exists $info->{'position'}) |
248
|
0 |
0 |
$info->{'parent'} ? : |
249
|
0 |
0 |
unless ($parent) |
250
|
0 |
0 |
$candidate_pair ? : |
257
|
0 |
0 |
unless ($parent_info) |
258
|
0 |
0 |
$candidate_pair ? : |
261
|
0 |
0 |
exists $parent_info->{'sep'} ? : |
262
|
0 |
0 |
exists $parent_info->{'texts'} ? : |
267
|
0 |
0 |
if (not exists $parent_info->{'fmt'} and scalar @texts == 1 and eval {
do {
$texts[0]->isa('B::DeparseTree::TreeNode')
}
}) |
272
|
0 |
0 |
if (exists $parent_info->{'fmt'} or exists $parent_info->{'position'}) { } |
279
|
0 |
0 |
unless exists $deparsed->{'optree'}{$parent_info->{'parent'}} |
291
|
0 |
0 |
unless exists $deparsed->{'optree'}{$parent_info->{'parent'}} |
299
|
0 |
0 |
unless $next_found_pos |
307
|
0 |
0 |
if ($found_pos) { } |
314
|
0 |
0 |
if (defined $found_pos) |
316
|
0 |
0 |
if ($marked_position) { } |
329
|
0 |
0 |
if $result |
331
|
0 |
0 |
if (ref $text) { } |
332
|
0 |
0 |
if (ref $text eq 'ARRAY' and scalar @$text == 2) { } |
|
0 |
0 |
elsif ($text->{'addr'} == $child_addr) { } |
333
|
0 |
0 |
if ($text->[1] == $child_addr) { } |
338
|
0 |
0 |
if ($i < $text_len) |
352
|
0 |
0 |
if ($i < $text_len) |
371
|
0 |
0 |
if ($start_index >= 0) |
372
|
0 |
0 |
if (index($parent_text, $child_text, $start_index + 1) < 0) |
388
|
0 |
0 |
if ($info) |
392
|
0 |
0 |
if ($info->{'parent'}) |
394
|
0 |
0 |
if ($parent) |
397
|
0 |
0 |
if ($texts) |
413
|
0 |
0 |
unless $info and $info->{'parent'} |
415
|
0 |
0 |
unless $parent |
419
|
0 |
0 |
$info->{'op'}->can('name') ? : |
423
|
0 |
0 |
if ($texts) |
435
|
0 |
0 |
if (ref $info and ref $info->{'texts'} eq 'ARRAY') |
437
|
0 |
0 |
if (ref $child_info) |
438
|
0 |
0 |
if (ref $child_info eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $child_info eq 'B::DeparseTree::TreeNode') { } |
457
|
0 |
0 |
if $a > $b |