Condition Coverage

blib/lib/Class/Generate.pm
Criterion Covered Total %
condition 115 187 61.5


and 3 conditions

line !l l&&!r l&&r condition
76 0 47 0 not $allow_redefine_for_class and &$class_defined($class_name)
98 0 15 0 not $allow_redefine_for_class and &$class_defined($class_name)
107 0 15 0 warnings::enabled() and eval '! exists $' . $p . '::{_cginfo}'
448 0 0 6 exists $params{'m3'} and UNIVERSAL::isa($params{'m3'}, 'HASH')
0 0 2 exists $params{'m2'} and UNIVERSAL::isa($params{'m2'}, 'ARRAY')
0 0 4 defined $_ && UNIVERSAL::isa($_, 'Basic_Class')
0 0 2 UNIVERSAL::isa($_[0], 'ARRAY') and not grep((!(defined $_ && UNIVERSAL::isa($_, 'Basic_Class'))), @{$_[0];})
0 0 0 defined $_ && UNIVERSAL::isa($_, 'Basic_Class')
0 0 0 UNIVERSAL::isa($_[0], 'HASH') and not grep((!(defined $_ && UNIVERSAL::isa($_, 'Basic_Class'))), values %{$_[0];})
0 0 0 defined $_ && UNIVERSAL::isa($_, 'Basic_Class')
0 0 0 UNIVERSAL::isa($_[0], 'ARRAY') and not grep((!(defined $_ && UNIVERSAL::isa($_, 'Basic_Class'))), @{$_[0];})
830 62 9 3 $_->isa('Class::Generate::Class_Method') && $class->private($_->name)
885 31 6 0 defined $nonpublic_member_regexp and @objs = $method->objects
953 161 7 1 $class->private($member_name = $member->name) and $disallow_private_members
970 27 9 0 $disallow_private_members && $class->private($element_name)
6 0 33 defined $class->members($element_name) || defined $class->user_defined_methods($element_name) and not $disallow_private_members && $class->private($element_name)
1017 13 0 0 defined $pre and not $problems_in_pre
1082 2 2 42 $valid_vars and $#$valid_vars >= 0
1143 0 0 15 exists $stab{$method} and do { local *method_entry = $stab{$method}; defined &method_entry }
1258 53 0 31 $class->required($name) and not $self->default
1275 53 0 31 $class->required($name) and not $self->default
1375 0 87 31 $class->check_params and $class->required($name)
1409 47 24 0 $class->readonly($self->name) and not $class->check_params
1419 0 41 6 $class->check_params and defined $self->base
1422 0 45 2 defined $class->check_params and defined $self->assert
1507 0 57 2 $class->check_params and $class->readonly($self->name)
1515 0 57 0 defined $class->check_params and defined $self->assert
1530 0 49 10 $class->check_params and defined $self->base
1605 0 25 5 $class->check_params and defined $self->base
1609 0 30 0 defined $class->check_params and defined $self->assert
1822 11 1 45 not $class->parents and $style->can('params_check_form')
1840 0 55 2 defined $class->check_params and defined $self->assert
1856 0 56 1 $class->check_params and $class->virtual
1859 0 15 42 not $class->can_assign_all_params and $style->can('init_form')
1878 118 14 1 ($style->isa('Class::Generate::Own') || $class->protected($_->name) || $class->private($_->name)) && defined $_->default
2098 1587 113 14 defined $r && $method_name =~ /$r/
2127 0 0 0 defined $value and $value
2169 54 5 2 defined $emr and 'copy' =~ /$emr/
2170 54 5 2 defined $emr and 'equals' =~ /$emr/
2456 0 0 0 !$self->check_params && $self->all_members_required && $self->constructor->style->isa('Class::Generate::Positional') && !defined($self->parents)
2503 0 0 0 !$self->check_params && $self->all_members_required && !$self->constructor->style->isa('Class::Generate::Own') && !defined($self->parents)

or 2 conditions

line l !l condition
2659 3 1 scalar $class->public_member_names || 0
2667 6 0 scalar $class->public_member_names || 0

or 3 conditions

line l !l&&r !l&&!r condition
92 0 0 15 $@ or scalar $parent->values == 0
448 39 22 5 not exists $params{'mem_a'} or UNIVERSAL::isa($params{'mem_a'}, 'ARRAY')
27 6 6 not exists $params{'mem_h'} or UNIVERSAL::isa($params{'mem_h'}, 'HASH')
715 15 1 7 @keyed_members or @pos_members
816 17 3 5 $class->protected($_->name) || $class->private($_->name)
26 11 5 $class->private($_) || $class->protected($_)
869 20 12 7 $c->protected($element_name) or $c->private($element_name)
872 30 14 8 $c->private($element_name) or $c->name eq $class->name
970 27 7 6 defined $class->members($element_name) || defined $class->user_defined_methods($element_name)
1011 0 0 0 @$warnings || $$errors
1325 31 53 34 $class->required($self->name) && !defined($self->default) || $self->can_be_invalid
1344 72 23 220 $class->readonly($name) || $class->required($name)
2170 2 0 59 defined $emr and 'equals' =~ /$emr/ or defined $self->user_defined_methods('equals')
2194 18 29 379 $self->private($element_name) || $self->protected($element_name)
2207 0 0 2 $self->private($method_name) || $self->protected($method_name)
2262 4 0 53 @protected_members or @protected_methods
2286 25 14 20 do { my $has_complex_mems; foreach my $m (@members) { if ($m->isa('Class::Generate::List_Member') or defined $m->base) { $has_complex_mems = 1; last; } ; } ; $has_complex_mems } || $has_parents
2350 0 0 0 $self->private($m) or $self->required($m)
2364 21 32 515 $self->private($_) || $self->protected($_)
2380 1 0 8 defined $self->members || $self->virtual && $self->check_params || !$self->parents || do { my $c = $self->constructor; $c->style->isa('Class::Generate::Own') unless defined $c->post or defined $c->assert }