line |
true |
false |
branch |
8
|
2 |
0 |
unless Type::Tiny::XS::AUTO::TC2($rv)
|
16
|
309 |
0 |
$] >= 5.018 ? :
|
17
|
309 |
0 |
$] >= 5.014 ? :
|
24
|
286 |
3 |
if ($type eq 'needs') { }
|
|
3 |
0 |
elsif ($type eq 'if') { }
|
25
|
286 |
0 |
if eval "require $condition; 1"
|
28
|
2 |
1 |
if $condition
|
30
|
1 |
288 |
unless $ok
|
31
|
286 |
2 |
ref $result eq 'SCALAR' ? :
|
|
0 |
288 |
ref $result eq 'CODE' ? :
|
62
|
306 |
3 |
$ENV{'EXTENDED_TESTING'} ? :
|
87
|
0 |
2 |
ref $_[0] ? :
|
96
|
286 |
70729 |
unless defined $subname
|
101
|
49790 |
21225 |
if $subname and not $already{$_[1]}++
|
112
|
811 |
14607 |
if (not defined $type) { }
|
119
|
0 |
426 |
if ref $_[0] eq "ARRAY"
|
122
|
0 |
424 |
unless $library->can("get_type")
|
129
|
3 |
423 |
if ($type) { }
|
130
|
0 |
3 |
$params ? :
|
131
|
0 |
3 |
if $post_method
|
134
|
0 |
423 |
if $params
|
140
|
1 |
425 |
@_ && wantarray ? :
|
143
|
811 |
0 |
if require Scalar::Util
|
149
|
6695 |
7912 |
$type->is_parameterizable ? :
|
177
|
0 |
15418 |
$args{'anonymous'} ? :
|
185
|
4 |
31991 |
ref $args{'source'} eq 'ARRAY' ? :
|
187
|
31979 |
16 |
unless defined $args{'alias'}
|
188
|
31993 |
2 |
unless defined $args{'line'}
|
190
|
31876 |
119 |
if defined $args{'description'}
|
192
|
31876 |
119 |
if defined $args{'description'} and not $^P & 16
|
200
|
15143 |
299 |
if $k =~ /^\$/ and &Scalar::Util::reftype($args{'environment'}{$k}) =~ /^(SCALAR|REF)$/
|
203
|
289 |
274 |
if $k =~ /^\@/ and &Scalar::Util::reftype($args{'environment'}{$k}) eq "ARRAY"
|
206
|
7 |
3 |
if $k =~ /^\%/ and &Scalar::Util::reftype($args{'environment'}{$k}) eq "HASH"
|
209
|
2 |
265 |
if $k =~ /^\&/ and &Scalar::Util::reftype($args{'environment'}{$k}) eq "CODE"
|
220
|
31730 |
264 |
exists $args{'alias'} ? :
|
231
|
5 |
31989 |
if ($alias and &ALIAS_IMPLEMENTATION() eq "tie")
|
236
|
4 |
31726 |
if ($e)
|
245
|
1 |
3 |
ref $args{'source'} eq 'ARRAY' ? :
|
251
|
3 |
31723 |
if ($alias and &ALIAS_IMPLEMENTATION() eq "Devel::LexAlias")
|
257
|
3 |
31723 |
if ($alias and &ALIAS_IMPLEMENTATION() eq "PadWalker")
|
272
|
2 |
15295 |
if ($key =~ /^\&/)
|
282
|
15271 |
24 |
if (not $alias) { }
|
|
7 |
17 |
elsif (&ALIAS_IMPLEMENTATION() eq 'perl') { }
|
|
5 |
12 |
elsif (&ALIAS_IMPLEMENTATION() eq 'Devel::LexAlias') { }
|
|
5 |
7 |
elsif (&ALIAS_IMPLEMENTATION() eq 'PadWalker') { }
|
318
|
2 |
2 |
if defined tied $$self
|
|
2 |
0 |
unless $method eq "DESTROY"
|
|
1 |
1 |
if defined tied @$self
|
|
5 |
2 |
unless $method eq "DESTROY"
|
|
2 |
2 |
if defined tied %$self
|
|
2 |
2 |
unless $method eq "DESTROY"
|