Condition Coverage

blib/lib/Method/Generate/Accessor.pm
Criterion Covered Total %
condition 90 104 86.5


and 3 conditions

line !l l&&!r l&&r condition
27 94 0 94 !$ENV{'MOO_XS_DISABLE'} && _maybe_load_module('Class::XSAccessor') && eval {
31 94 0 94 $CAN_HAZ_XS && eval {
66 170 8 2 $spec->{'reader'} and $spec->{'writer'}
107 2 4 4 &blessed($isa) and $isa->can("coercion")
2 2 2 &blessed($isa) and $isa->can("coerce")
144 36 446 6 not $spec->{'allow_overwrite'} and defined &{"${into}::$reader";}
145 241 23 218 our $CAN_HAZ_XS and $self->is_simple_get($name, $spec)
164 10 174 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$accessor";}
165 92 11 81 our $CAN_HAZ_XS and $self->is_simple_get($name, $spec)
103 50 31 our $CAN_HAZ_XS and $self->is_simple_get($name, $spec) and $self->is_simple_set($name, $spec)
187 0 20 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$writer";}
188 10 5 5 our $CAN_HAZ_XS and $self->is_simple_set($name, $spec)
208 0 12 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$pred";}
209 6 0 6 our $CAN_HAZ_XS and our $CAN_HAZ_XS_PRED
231 0 14 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$cl";}
260 4 32 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$proxy";}
273 8 34 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$asserter";}
322 686 2 104 $spec->{'lazy'} && (exists $spec->{'default'} || $spec->{'builder'})
611 112 2 10 $trigger && $test

or 2 conditions

line l !l condition
42 18 0 $type || 'an accessor'
88 46 0 $spec->{'builder'} || 0
93 14 672 $spec->{'predicate'} || 0
97 16 670 $spec->{'clearer'} || 0
101 30 656 $spec->{'trigger'} || 0
105 88 598 $spec->{'coerce'} || 0
332 48 0 $spec->{'is'} || ''

or 3 conditions

line l !l&&r !l&&!r condition
21 0 2 186 "$]" < 5.008003 || $ENV{'MOO_TEST_PRE_583'}
66 4 2 178 exists $spec->{'accessor'} or $spec->{'reader'} and $spec->{'writer'}
71 4 10 0 $spec->{'builder'} ||= "_build_" . $name
242 4 38 0 $spec->{'asserter'} ||= "_assert_" . $name
291 2 22 88 $key eq "builder" or $key eq "default"
302 2 10 12 exists $spec->{'builder'} or exists $spec->{'default'}
332 2 6 48 $spec->{'builder'} or exists $spec->{'default'}
337 128 0 1410 exists $spec->{'default'} or $spec->{'builder'}
471 116 142 10 not defined $init_arg or $init_arg eq $name
545 0 4 100 $values eq "\@_" or $values eq "\$_[0]"
578 124 1434 2 $has_default or $test