Branch Coverage

blib/lib/DS/TypeSpec.pm
Criterion Covered Total %
branch 18 40 45.0


line true false branch
34 23 6 if ($arg1)
35 23 0 if (ref $arg1 eq '') { }
37 19 4 if ($arg2)
43 19 4 if ($fields)
53 19 10 if ($fields)
71 0 57 if (ref $field eq '')
75 0 57 if ($$self{'fields'}{$$field{'name'}}) { }
94 0 0 if (not ref $field eq '') { }
100 0 0 if (not $$self{'fields'}{$$field{'name'}}) { }
111 0 0 if ($fields) { }
115 0 0 if ($$self{'fields'}{$field})
136 0 0 if ($keys_locked) { }
137 0 0 $keys_locked ? :
148 0 0 if ($values_readonly) { }
149 0 0 $values_readonly ? :
161 2 21 if ($other->isa('DS::TypeSpec::Any')) { }
181 4 0 if ($arg1)
182 4 0 if (ref $arg1 eq '') { }
184 4 0 if ($arg2)
204 7 2 if (my $field = $$self{'fields'}{$$new_fields{$new_field}}) { }