Branch Coverage

blib/lib/Salvation/TC.pm
Criterion Covered Total %
branch 36 52 69.2


line true false branch
224 68 8 unless $class->can('create_validator_from_sig')
274 56 20 unless $class->can('create_length_validator')
325 7 1 unless defined $_[0] and blessed($_[0]) and $_[0]->isa($class)
509 306 9 if (scalar @$tokens == 1) { }
511 213 93 if (exists $$tokens[0]{'type'}) { }
2 91 elsif (exists $$tokens[0]{'maybe'}) { }
51 40 elsif (exists $$tokens[0]{'class'}) { }
12 28 elsif (exists $$tokens[0]{'signed'}) { }
28 0 elsif (exists $$tokens[0]{'length'}) { }
544 0 12 if defined $present_type
551 4 8 $type->isa('Salvation::TC::Meta::Type::Parameterized') ? :
555 4 8 $method eq 'setup_parameterized_type' ? :
573 5 23 $type->isa('Salvation::TC::Meta::Type::Parameterized') ? :
577 5 19 $method eq 'setup_parameterized_type' ? :
1 23 $type->has_signature ? :
637 136 77 if defined $type
639 76 0 if (not 'Class::Inspector'->loaded($str) || eval { do { &Module::Load::load($str); 1 } } and 'Class::Inspector'->loaded($salvation_tc_type_str) || eval { do { &Module::Load::load($salvation_tc_type_str); 1 } })
657 76 1 if ($str->isa($$spec[0]))
705 86 54 if ($@)
707 86 0 if (blessed $@ and $@->isa('Salvation::TC::Exception::WrongType')) { }
734 0 0 if ($@)
736 0 0 if (blessed $@ and $@->isa('Salvation::TC::Exception::WrongType')) { }
762 0 0 if ($node->isa('Salvation::TC::Exception::WrongType::TC')) { }
766 0 0 if (defined(my $param_name = $node->getParamName)) { }
784 0 0 if (defined(my $prev = $node->getPrev)) { }
788 0 0 if (ref $prev eq 'ARRAY') { }