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 {
59 170 8 2 $spec->{'reader'} and $spec->{'writer'}
92 2 4 4 &blessed($isa) and $isa->can('coercion')
2 2 2 &blessed($isa) and $isa->can('coerce')
126 36 446 6 not $spec->{'allow_overwrite'} and defined &{"${into}::$reader";}
127 241 23 218 our $CAN_HAZ_XS and $self->is_simple_get($name, $spec)
144 10 174 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$accessor";}
145 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)
165 0 20 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$writer";}
166 10 5 5 our $CAN_HAZ_XS and $self->is_simple_set($name, $spec)
185 0 12 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$pred";}
186 6 0 6 our $CAN_HAZ_XS and our $CAN_HAZ_XS_PRED
205 0 14 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$cl";}
232 4 32 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$proxy";}
244 8 34 2 not $spec->{'allow_overwrite'} and defined &{"${into}::$asserter";}
292 686 2 104 $spec->{'lazy'} && (exists $spec->{'default'} || $spec->{'builder'})
581 112 2 10 $trigger && $test

or 2 conditions

line l !l condition
42 18 0 $type || 'an accessor'
77 46 0 $spec->{'builder'} || 0
81 14 672 $spec->{'predicate'} || 0
84 16 670 $spec->{'clearer'} || 0
87 30 656 $spec->{'trigger'} || 0
90 88 598 $spec->{'coerce'} || 0
302 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'}
59 4 2 178 exists $spec->{'accessor'} or $spec->{'reader'} and $spec->{'writer'}
63 4 10 0 $spec->{'builder'} ||= '_build_' . $name
215 4 38 0 $spec->{'asserter'} ||= '_assert_' . $name
261 2 22 88 $key eq 'builder' or $key eq 'default'
272 2 10 12 exists $spec->{'builder'} or exists $spec->{'default'}
302 2 6 48 $spec->{'builder'} or exists $spec->{'default'}
307 128 0 1410 exists $spec->{'default'} or $spec->{'builder'}
441 116 142 10 not defined $init_arg or $init_arg eq $name
515 0 4 100 $values eq '@_' or $values eq '$_[0]'
548 124 1434 2 $has_default or $test