Condition Coverage

blib/lib/Tangence/Class.pm
Criterion Covered Total %
condition 9 17 52.9


and 3 conditions

line !l l&&!r l&&r condition
136 4 155 296 not @supers and $self->perlname ne "Tangence::Object"

or 2 conditions

line l !l condition
82 12 0 delete $params{'dim'} || 1

or 3 conditions

line l !l&&r !l&&!r condition
30 0 38 0 $CLASSES{$name} //= $class->new(%args)
121 19 0 0 $CLASSES{$name} // croak("Unknown Tangence::Class for '${name}'")
127 335 0 0 $CLASSES{$name} // croak("Unknown Tangence::Class for '${perlname}'")
162 22 19 0 $smashkeys //= do { my %smash; $smash{$_->name} = 1 foreach (grep {$_->smashed;} values %{$self->properties;}); $Tangence::Message::SORT_HASH_KEYS ? [sort(keys %smash)] : [keys %smash] }