| line |
true |
false |
branch |
|
153
|
2 |
79 |
if &List::Util::any(sub {
not ref $_;
}
, @components) |
|
155
|
68 |
11 |
$self->{'available'}->$is_null ? : |
|
164
|
0 |
151 |
unless defined $guid |
|
165
|
2 |
149 |
if not defined $type or ref $type |
|
176
|
0 |
147 |
unless defined $guid |
|
186
|
1 |
97 |
if ($self->check($guid, $name)) { } |
|
212
|
0 |
30 |
unless defined $guid |
|
215
|
32 |
1 |
unless not defined $_ |
|
|
2 |
28 |
if &List::Util::any(sub {
ref $_ unless not defined $_;
}
, @types) |
|
221
|
0 |
17 |
unless defined $guid |
|
223
|
13 |
4 |
unless (@types) |
|
225
|
2 |
11 |
if (my(@all) = keys %{$$self{'components'};}) |
|
243
|
0 |
4 |
if &List::Util::any(sub {
ref $_;
}
, @types) |
|
246
|
1 |
5 |
unless $self->check($guid, $name) |
|
275
|
0 |
20 |
unless defined $guid |
|
279
|
19 |
1 |
if $pos < @{$self->{'entities'};} |
|
295
|
2 |
1 |
unless (ref $comparator) |
|
301
|
1 |
25 |
if $i > $#{$dense;} |
|
306
|
8 |
17 |
unless $set->$contains($that) |
|
308
|
17 |
0 |
unless $this == $that |
|
359
|
1 |
1 |
$res ? : |
|
369
|
3 |
16 |
unless (@types) |
|
378
|
10 |
6 |
if (@types == 1) |
|
409
|
2 |
9 |
unless &List::Util::all(sub {
$self->check($guid, $_);
}
, @rest) |
|
413
|
9 |
9 |
$_ eq $short ? : |
|
429
|
2 |
0 |
unless @types |
|
432
|
0 |
2 |
unless open my $fh, '>', \my $out |
|
433
|
1 |
1 |
if $print |
|
437
|
0 |
4 |
unless my $set = $self->{'components'}{$_} |
|
438
|
0 |
4 |
unless @{$set->[0] // [];} |
|
440
|
4 |
0 |
if not @types or @names > 1 |
|
446
|
12 |
6 |
defined $component ? : |
|
454
|
2 |
2 |
if $index++ < $#names |
|
457
|
1 |
1 |
unless $print |