line |
true |
false |
branch |
56
|
0 |
95 |
if ($ENV{'HARNESS_ACTIVE'} and $0 =~ m[t[\\/]type_constraints[\\/]specio\.t$])
|
78
|
0 |
825 |
unless my $name = &_STRINGLIKE(shift())
|
95
|
4 |
1 |
if @_ % 2
|
103
|
4 |
1 |
defined $name ? :
|
106
|
4 |
1 |
if defined $name
|
114
|
2 |
3 |
if @_ % 2
|
124
|
2 |
3 |
defined $name ? :
|
127
|
2 |
3 |
if defined $name
|
135
|
7 |
1 |
if @_ % 2
|
144
|
5 |
3 |
unless (keys %p)
|
145
|
2 |
3 |
if (my $exists = internal_types_for_package($caller)->{$name})
|
154
|
5 |
1 |
defined $name ? :
|
|
3 |
3 |
defined $p{'role'} ? :
|
158
|
5 |
1 |
if defined $name
|
166
|
4 |
1 |
if @_ % 2
|
170
|
4 |
1 |
unless (keys %p)
|
171
|
1 |
3 |
if (my $exists = internal_types_for_package($caller)->{$name})
|
180
|
3 |
1 |
defined $name ? :
|
|
1 |
3 |
defined $p{'class'} ? :
|
184
|
3 |
1 |
if defined $name
|
192
|
1 |
1 |
if @_ % 2
|
202
|
1 |
1 |
defined $name ? :
|
205
|
1 |
1 |
if defined $name
|
213
|
7 |
1 |
if @_ % 2
|
217
|
4 |
4 |
unless (keys %p)
|
218
|
4 |
0 |
if (my $exists = internal_types_for_package($caller)->{$name})
|
227
|
3 |
1 |
defined $name ? :
|
|
4 |
0 |
defined $p{'role'} ? :
|
231
|
3 |
1 |
if defined $name
|
239
|
5 |
1 |
if @_ % 2
|
243
|
3 |
3 |
unless (keys %p)
|
244
|
2 |
1 |
if (my $exists = internal_types_for_package($caller)->{$name})
|
253
|
3 |
1 |
defined $name ? :
|
|
3 |
1 |
defined $p{'class'} ? :
|
257
|
3 |
1 |
if defined $name
|
265
|
2 |
2 |
if @_ % 2
|
270
|
2 |
2 |
defined $name ? :
|
276
|
2 |
2 |
if defined $name
|
284
|
3 |
2 |
if @_ % 2
|
289
|
3 |
2 |
defined $name ? :
|
295
|
3 |
2 |
if defined $name
|
306
|
12 |
867 |
if exists $p{'where'}
|
307
|
0 |
879 |
if exists $p{'message'}
|
308
|
796 |
83 |
if exists $p{'inline'}
|
320
|
6 |
10 |
if exists $p{'using'}
|
321
|
3 |
13 |
if exists $p{'inline'}
|