Branch Coverage

Bio/DB/GFF/Segment.pm
Criterion Covered Total %
branch 11 58 18.9


line true false branch
67 0 160 if CORE::ref $segname and $segname->can('class')
70 0 160 unless $factory
71 0 160 if CORE::ref $class
196 0 0 $start < $stop ? :
216 0 0 $start > $stop ? :
251 0 225 if @_
280 20 15 if ($start <= $stop) { }
310 0 0 unless 'Bio::PrimarySeq'->can('new')
311 0 0 unless $dna
392 0 15 unless defined $peer
393 0 15 unless CORE::ref $peer and $peer->isa('Bio::DB::GFF::Segment')
460 0 0 if @_
605 10 5 unless my $hash = $self->{'truncated'}
606 0 5 unless CORE::ref $hash eq 'HASH'
621 0 0 if ($other->isa('Bio::DB::GFF::RelSegment'))
622 0 0 if $self->abs_ref ne $other->abs_ref
630 0 0 if ($other->isa('Bio::DB::GFF::RelSegment'))
631 0 0 if $self->abs_ref ne $other->abs_ref
646 0 0 if ($other->isa('Bio::DB::GFF::RelSegment'))
647 0 0 if $self->abs_ref ne $other->abs_ref
654 0 0 if ($other->isa('Bio::DB::GFF::RelSegment'))
655 0 0 if $self->abs_ref ne $other->abs_ref
663 0 0 if ($other->isa('Bio::DB::GFF::RelSegment'))
664 0 0 if $self->abs_ref ne $other->abs_ref
696 0 0 if (defined $value)
699 0 0 unless (exists $obj->{'primary_id'})
814 0 0 if ($species) { }
836 0 0 if (defined $value or not defined $obj->{'annotation'})
837 0 0 unless defined $value