Branch Coverage

blib/lib/Statistics/R/REXP/Environment.pm
Criterion Covered Total %
branch 12 14 85.7


line true false branch
33 2 322 if (scalar @_ == 1) { }
1 321 elsif (@_ % 2) { }
34 0 2 if (ref $_[0] eq 'HASH') { }
1 2 elsif (&blessed($_[0]) and $_[0]->isa('Statistics::R::REXP::Environment')) { }
59 1 320 if ref $self->frame ne 'HASH' or grep {not &blessed($_) && $_->isa('Statistics::R::REXP');} values %{$self->frame;}
61 1 319 if defined $self->enclosure and not &blessed(scalar $self->enclosure) && $self->enclosure->isa('Statistics::R::REXP::Environment')
79 0 1 $self->attributes && exists $self->attributes->{'name'} ? :