Branch Coverage

blib/lib/exact/class.pm
Criterion Covered Total %
branch 54 60 90.0


line true false branch
20 26 3 if ($caller) { }
25 1 2 if $self eq "exact::class"
31 0 29 if $perl_version > 36
48 68 43 if (ref $store->{'struc'}{$namespace} eq "HASH")
57 4 64 if exists $input->{$class_has_name}
61 10 161 if (exists $input->{$has_name}) { }
111 50 elsif (exists $store->{'struc'}{$namespace}{'value'}{$has_name}) { }
76 6 2 @_ > 1 ? :
8 30 @_ ? :
80 26 59 if (ref $store->{'roles'}{$namespace} eq "ARRAY")
109 127 52 if @_ > 2
121 12 0 if @_ > 1
135 35 10 if @_ > 1
142 6 259 ref $set->{'attrs'} ? :
147 151 113 if (@_ > 1) { }
154 4 109 if ref $self->{$name} eq "REF" and ref ${$self->{$name};} eq "CODE"
157 9 100 if ref $self->{$name} eq "CODE"
164 16 69 if (@_ > 1) { }
171 0 69 if ref $store->{'struc'}{$set->{'caller'}}{'value'}{$name} eq "REF" and ref ${$store->{'struc'}{$set->{'caller'}}{'value'}{$name};} eq "CODE"
176 0 69 if ref $store->{'struc'}{$set->{'caller'}}{'value'}{$name} eq "CODE"
179 197 80 $set->{'obj_accessor'} ? :
187 179 98 if (ref $set->{'self'}) { }
188 127 52 if exists $set->{'value'}
191 75 23 if $set->{'set_has'}
193 80 18 if exists $set->{'value'}
213 18 11 if ($store->{'struc'}{$role}{'has'}{$name})
220 25 4 if exists $store->{'struc'}{$role}{'value'}{$name}
249 4 1 if (my $class = &Scalar::Util::blessed($self)) { }
252 1 0 /^\+(.+)$/u ? :
258 0 4 /^\+(.+)$/u ? :