Branch Coverage

lib/Type/Registry.pm
Criterion Covered Total %
branch 36 58 62.0


line true false branch
29 2 13 if ($globals->{'lexical'}) { }
30 0 2 if (ref $value eq 'HASH' and exists $value->{'for_class'}) { }
41 5 51 @_ ? :
46 0 112 if ref $class
68 1 12 if ref $for
87 13 2 if ($library->isa('Type::Library') or $library eq 'Types::TypeTiny') { }
1 1 elsif ($library->isa('Exporter') and my $type_tag = do { no strict 'refs'; do { "${library}::EXPORT_TAGS" }->{'types'} }) { }
0 1 elsif ($library->isa('MooseX::Types::Base')) { }
0 1 elsif ($library->isa('MouseX::Types::Base')) { }
89 0 13 unless Types::TypeTiny::is_ArrayLike($types)
105 0 0 unless Types::TypeTiny::is_ArrayLike($types) and @$types == 0
121 0 0 unless Types::TypeTiny::is_ArrayLike($types) and @$types == 0
142 0 523 if exists $self->{$key} and $self->{$key}{'uniq'} != $hash{$key}{'uniq'}
154 1 3 if $type->is_anon
162 0 2676 if exists $self->{$name} and $self->{$name}{'uniq'} != $type->{'uniq'}
171 1 4 unless my $lookup = eval { do { $self->lookup($old) } }
183 166 34 if (exists $self->{$tc}) { }
2 32 elsif ($self->has_parent) { }
195 0 1 ref $_[0] ? :
219 3 0 $_[1] ? :
3 1 unless $_[0] =~ /^(.+)::(\w+)$/
230 0 1 if ($library->isa("MooseX::Types::Base"))
232 0 0 unless my $type = Moose::Util::TypeConstraints::find_type_constraint($library->get_type($typename))
238 0 1 if ($library->isa("MouseX::Types::Base"))
240 0 0 unless my $sub = $library->can($typename)
241 0 0 unless my $type = Mouse::Util::TypeConstraints::find_type_constraint(&$sub())
246 1 0 if ($library->can("get_type"))
257 16 23 unless $self->simple_lookup(@_)
312 16 1 if $type