| line |
true |
false |
branch |
|
143
|
6 |
3 |
if (defined $Embedix::ECD::__parser) { } |
|
156
|
0 |
35 |
if @_ & 1 |
|
213
|
21 |
6 |
if ref $proto |
|
216
|
6 |
21 |
unless $self |
|
220
|
21 |
137 |
if (ref $$i[0]) { } |
|
228
|
6 |
131 |
if ($$i[0] eq 'Comment') { } |
|
256
|
0 |
6 |
unless open ECD, $filename |
|
278
|
0 |
2 |
unless open ECD, $filename |
|
295
|
0 |
15 |
if (@_) { } |
|
328
|
2 |
2 |
if (@_) { } |
|
350
|
1 |
1 |
if @x == 1 |
|
398
|
3 |
1 |
if (defined $$self{'child'}{$name}) { } |
|
414
|
0 |
28 |
unless ref $obj and $obj->isa('Embedix::ECD') |
|
428
|
0 |
0 |
if (ref $obj) { } |
|
433
|
0 |
0 |
if (defined $$self{'child'}{$name}) { } |
|
463
|
17 |
1 |
if (defined $$self{'child'}{$name}) { } |
|
479
|
0 |
5 |
unless ($self->name eq $ecd->name and ref $self eq ref $ecd) |
|
487
|
1 |
109 |
if defined $$ecd{'attribute'}{$_} |
|
497
|
1 |
3 |
if (not $child) { } |
|
511
|
1 |
1 |
if (not ref $parent) { } |
|
529
|
0 |
1 |
if @_ & 1 |
|
532
|
0 |
1 |
unless defined $opt{'indent'} |
|
551
|
9 |
13 |
if (defined $a) |
|
552
|
2 |
7 |
if (ref $a) { } |
|
553
|
2 |
0 |
if (scalar @$a) { } |