| line |
true |
false |
branch |
|
43
|
1 |
5 |
if ($key =~ /^(class|role):(.+)$/)
|
|
44
|
1 |
0 |
if ($spec->{'-IS_COMMAND'})
|
|
49
|
0 |
0 |
if ($spec->{'-IS_COMMAND'} or $spec->{'-FLAGS'} or $spec->{'-ARGS'})
|
|
66
|
0 |
1 |
unless $commands
|
|
78
|
0 |
2 |
unless $Zydeco::Lite::THIS{'CLASS_SPEC'}
|
|
80
|
0 |
2 |
unless my $name = &Zydeco::Lite::_shift_type(scalar &Str(), \@_)
|
|
82
|
0 |
2 |
@_ == 1 ? :
|
|
105
|
0 |
1 |
unless $Zydeco::Lite::THIS{'CLASS_SPEC'}
|
|
107
|
0 |
1 |
unless my $name = &Zydeco::Lite::_shift_type(scalar &Str(), \@_)
|
|
109
|
0 |
1 |
@_ == 1 ? :
|
|
131
|
3 |
0 |
unless (ref $spec->{'kingpin_type'})
|
|
134
|
1 |
2 |
unless $reg->has_parent
|
|
143
|
0 |
0 |
$spec->{'does'} ? :
|
|
|
0 |
0 |
$spec->{'isa'} ? :
|
|
|
0 |
0 |
$spec->{'type'} ? :
|
|
|
3 |
0 |
ref($spec->{'type'} || $spec->{'isa'}) ? :
|
|
|
0 |
3 |
$spec->{'kingpin_type'} ? :
|
|
151
|
0 |
3 |
if ($type <= &ArrayRef()) { }
|
|
|
1 |
2 |
elsif ($type <= &HashRef()) { }
|
|
|
0 |
2 |
elsif ($type <= &Bool()) { }
|
|
|
1 |
1 |
elsif ($type <= &File()) { }
|
|
|
0 |
1 |
elsif ($type <= &Dir()) { }
|
|
|
0 |
1 |
elsif ($type <= &Path()) { }
|
|
|
1 |
0 |
elsif ($type <= &Int()) { }
|
|
|
0 |
0 |
elsif ($type <= &Num()) { }
|
|
152
|
0 |
0 |
if ($type->is_parameterized and $type->parent == &ArrayRef()) { }
|
|
154
|
0 |
0 |
if ($type_parameter <= &File()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Dir()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Path()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Int()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Num()) { }
|
|
178
|
0 |
1 |
if ($type->is_parameterized and $type->parent == &ArrayRef()) { }
|
|
180
|
0 |
0 |
if ($type_parameter <= &File()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Dir()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Path()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Int()) { }
|
|
|
0 |
0 |
elsif ($type_parameter <= &Num()) { }
|
|
202
|
0 |
1 |
if $flag->can('placeholder')
|
|
226
|
0 |
3 |
if ($spec->{'required'})
|
|
230
|
0 |
3 |
if ($spec->{'hidden'})
|
|
234
|
0 |
3 |
if (exists $spec->{'short'})
|
|
238
|
0 |
3 |
if (exists $spec->{'env'})
|
|
242
|
0 |
3 |
if (exists $spec->{'placeholder'})
|
|
246
|
1 |
2 |
if ($kind eq 'arg')
|
|
247
|
0 |
1 |
if (&Types::TypeTiny::CodeLike()->check($spec->{'default'})) { }
|
|
|
0 |
1 |
elsif (exists $spec->{'default'}) { }
|
|
|
0 |
1 |
elsif (my $builder = $spec->{'builder'}) { }
|
|
251
|
0 |
0 |
if ($cr->blessed and $cr->isa('Ask::Question'))
|
|
252
|
0 |
0 |
unless $cr->has_type
|
|
253
|
0 |
0 |
unless $cr->has_text
|
|
254
|
0 |
0 |
unless $cr->has_title
|
|
255
|
0 |
0 |
unless $cr->has_spec
|
|
263
|
0 |
0 |
if is_Int($builder) and $builder eq 1
|
|
273
|
0 |
1 |
unless my $name = &Zydeco::Lite::_shift_type(scalar &Str(), \@_)
|