lib/Type/Registry.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 22 | 39 | 56.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
71 | 3 | 0 | 1 | $library->isa("Exporter") and my $type_tag = do { |
89 | 0 | 0 | 1 | Types::TypeTiny::is_ArrayLike($types) and @$types == 0 |
105 | 0 | 0 | 1 | Types::TypeTiny::is_ArrayLike($types) and @$types == 0 |
126 | 505 | 39 | 0 | exists $self->{$key} and $self->{$key}{'uniq'} != $hash{$key}{'uniq'} |
146 | 1659 | 67 | 0 | exists $self->{$name} and $self->{$name}{'uniq'} != $type->{'uniq'} |
line | l | !l | condition |
---|---|---|---|
72 | 1 | 13 | $types ||= ["-types"] |
88 | 0 | 1 | $types ||= [] |
104 | 0 | 1 | $types ||= [] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
47 | 722 | 84 | 0 | $registries{$for} ||= $class->new |
53 | 8 | 0 | 0 | $registries{$for} ||= $class->new |
71 | 14 | 0 | 4 | $library->isa("Type::Library") or $library eq "Types::TypeTiny" |
84 | 0 | 1 | 0 | $types ||= $type_tag |
137 | 1723 | 3 | 1 | $name ||= do { |
179 | 1 | 0 | 0 | ref $self || $self |