line |
true |
false |
branch |
42
|
0 |
4 |
$INC{'Type/Registry.pm'} ? :
|
|
4 |
0 |
unless ref $caller or $caller eq "-lexical" or $globals->{'lexical'}
|
49
|
0 |
27 |
@_ == 1 ? :
|
52
|
1 |
26 |
if exists $opts{'parent'}
|
55
|
1 |
25 |
if exists $opts{'constraint'}
|
58
|
1 |
24 |
if exists $opts{'inlined'}
|
60
|
1 |
23 |
unless exists $opts{'values'}
|
65
|
2 |
44 |
unless $key =~ /^[A-Z][A-Z0-9]*(_[A-Z0-9]+)*/
|
71
|
2 |
40 |
unless is_PositiveOrZeroInt($value) and _is_power_of_two($value)
|
74
|
1 |
39 |
if $already{$value}++
|
83
|
12 |
0 |
if (defined $opts{'coercion'} and not ref $opts{'coercion'} and 1 eq $opts{'coercion'})
|
104
|
4 |
6 |
unless &Scalar::Util::blessed($self) and $self->isa("Type::Tiny::Bitfield") and &Scalar::Util::blessed($other) and $other->isa("Type::Tiny::Bitfield")
|
110
|
0 |
6 |
if $swap
|
114
|
1 |
8 |
if exists $other->values->{$k}
|
118
|
4 |
1 |
$self->has_coercion || $other->has_coercion ? :
|
138
|
5 |
0 |
unless ($self->is_anon)
|
175
|
0 |
1 |
unless $self->exportables
|
221
|
2 |
4 |
unless $self->check($int)
|
227
|
7 |
9 |
if $int & $values{$n}
|
236
|
0 |
5 |
if $m eq "DESTROY"
|
237
|
4 |
1 |
if (ref $self and exists $self->{'values'}{$m})
|
246
|
2 |
500 |
if (ref $self and exists $self->{'values'}{$m})
|