| line |
true |
false |
branch |
|
29
|
20 |
10 |
if (defined $expr) { } |
|
40
|
24 |
17 |
if (defined $expr) { } |
|
54
|
8 |
6 |
if (defined $expr) { } |
|
68
|
1 |
36 |
if (not defined $list) { } |
|
|
16 |
20 |
elsif ($list->car eq $expr) { } |
|
84
|
1 |
353 |
if (not defined $expr) { } |
|
|
217 |
136 |
elsif (&scalarp($expr)) { } |
|
|
128 |
8 |
elsif (ref $expr eq 'ARRAY') { } |
|
116
|
9 |
38 |
if (not defined $expr) { } |
|
|
24 |
14 |
elsif (&scalarp($expr)) { } |
|
|
13 |
1 |
elsif (&consp($expr)) { } |
|
120
|
22 |
2 |
unless (exists $self->{'symbol_map'}{$expr}) |
|
141
|
16 |
12 |
if (not defined $args) { } |
|
153
|
13 |
4 |
if ($prim_idx > -1) { } |
|
154
|
1 |
12 |
unless (defined $processed_args) |
|
166
|
2 |
66 |
if (not defined $expr) { } |
|
|
25 |
41 |
elsif (&scalarp($expr)) { } |
|
169
|
2 |
23 |
if (&looks_like_number($expr)) { } |
|
|
4 |
19 |
elsif (uc $expr eq 'T') { } |
|
|
2 |
17 |
elsif (uc $expr eq 'NIL') { } |
|
177
|
16 |
1 |
if (defined $position) { } |
|
185
|
14 |
27 |
if ($func eq 'QUOTE') { } |
|
|
6 |
21 |
elsif ($func eq 'LAMBDA') { } |
|
|
4 |
17 |
elsif ($func eq 'IF') { } |