line |
true |
false |
branch |
76
|
4 |
19 |
if ($command_non_text{$command})
|
90
|
1 |
39 |
unless ($self->{'in_begin'} eq '' or $self->{'in_begin'} =~ /^:/)
|
105
|
36 |
38 |
if (not ref $obj) { }
|
107
|
4 |
32 |
unless ($obj =~ /^\s*$/)
|
116
|
37 |
1 |
if ($cmd eq 'L') { }
|
|
0 |
1 |
elsif ($cmd eq 'X' or $cmd eq 'Z') { }
|
120
|
37 |
0 |
ref $_ ? :
|
127
|
2 |
35 |
unless (defined $name)
|
129
|
11 |
26 |
if ($last_L and not $name eq $last_L_name && (defined $display || defined $last_L_display))
|
146
|
1 |
0 |
if (my $subtree = $obj->parse_tree)
|
152
|
39 |
0 |
unless ($text =~ /^\s.*$/)
|