Branch Coverage

lib/Types/Standard/Tuple.pm
Criterion Covered Total %
branch 118 140 84.2


line true false branch
35 2 2 if Types::TypeTiny::is_TypeTiny($_[0])
40 0 2 unless Types::TypeTiny::is_ArrayLike($of)
49 0 2 $type->has_coercion ? :
0 2 exists $values->{'where'} ? :
55 1 1 $INC{'Type/Registry.pm'} ? :
2 0 unless ref $caller or $caller eq "-lexical" or $globals->{'lexical'}
62 18 39 @_ && Types::TypeTiny::is_TypeTiny($_[-1]) && $_[-1]->is_strictly_a_type_of($_Slurpy) ? :
71 1 98 unless Types::TypeTiny::is_TypeTiny($_)
78 38 18 unless ($slurpy)
81 62 7 unless $_->is_strictly_a_type_of($_Optional)
83 53 16 defined $known ? :
86 25 13 if (@known == @constraints)
89 23 2 if $xsub
98 1 55 unless join("|", @sorted_is_optional) eq join("|", @is_optional)
104 45 78 if ($#constraints < $value->$#*)
105 8 37 unless $slurpy
107 11 26 if ($slurp_hash) { }
26 0 elsif (not $slurp_any) { }
108 5 6 unless ($value->$#* - $#constraints + 1) % 2
110 2 4 unless $slurpy->check($tmp)
114 15 11 unless $slurpy->check($tmp)
118 18 180 if $i > $value->$#*
121 17 163 unless $constraints[$i]->check($value->[$i])
129 18 37 @_ && Types::TypeTiny::is_TypeTiny($_[-1]) && $_[-1]->is_strictly_a_type_of($_Slurpy) ? :
137 3 52 if grep {not $_->can_be_inlined;} @constraints
138 1 51 if defined $slurpy and not $slurpy->can_be_inlined
141 34 17 unless ($slurpy)
144 54 6 unless $_->is_strictly_a_type_of($_Optional)
146 48 12 defined $known ? :
149 25 9 if (@known == @constraints)
157 17 34 if (defined $slurpy)
158 7 10 if $slurpy->my_slurp_into eq "HASH"
163 0 17 if $slurpy->my_unslurpy->equals(&Types::Standard::Any())
172 160 268 if $xsubname and not $Type::Tiny::AvoidCallbacks
191 125 40 $slurpy ? :
0 165 $slurpy_any ? :
103 165 scalar @constraints == $min && !$slurpy ? :
192 121 476 $is_optional[$_] ? :
16 597 if ($inline eq '(!!1)') { }
205 2 2 @constraints && Types::TypeTiny::is_TypeTiny($constraints[-1]) && $constraints[-1]->is_strictly_a_type_of($_Slurpy) ? :
213 2 2 if (@constraints < @$value and not $slurpy)
224 0 2 if $constraints[$i]->is_strictly_a_type_of(&Types::Standard::Optional()) and $i > $value->$#*
227 1 1 if $constraints[$i]->check($value->[$i])
241 1 0 if (defined $slurpy)
242 1 0 $slurpy->my_slurp_into eq 'HASH' ? :
254 1 0 $slurpy->my_slurp_into eq 'HASH' ? :
1 0 unless $slurpy->check($tmp)
267 4 11 @tuple && Types::TypeTiny::is_TypeTiny($tuple[-1]) && $tuple[-1]->is_strictly_a_type_of($_Slurpy) ? :
276 4 11 $slurpy ? :
277 1 28 unless $tc->can_be_inlined
278 12 17 if $tc->has_coercion and not $tc->coercion->can_be_inlined
279 18 11 if $tc->has_coercion
282 5 10 unless $child_coercions_exist
287 4 6 if ($all_inlinable) { }
294 2 1 unless $slurpy
304 4 0 $ct_coerce ? :
315 1 2 if ($slurpy)
318 0 1 $slurpy_is_hashref ? :
326 1 0 $slurpy->has_coercion ? :
333 0 1 $slurpy_is_hashref ? :
353 6 0 @_ ? :
355 2 4 if (not $slurpy and @$value > @tuple)
361 0 0 if $i > $value->$#* and $is_optional[$i]
364 7 1 $ct->has_coercion ? :
366 0 8 unless $ct->check($x)
371 3 1 if ($slurpy and @$value > @tuple)
376 2 1 $slurpy_is_hashref ? :
377 3 0 if $slurpy->has_coercion
378 2 1 $slurpy_is_hashref ? :
3 0 $slurpy->check($tmp) ? :