Branch Coverage

blib/lib/AlignDB/IntSpanXS.pm
Criterion Covered Total %
branch 100 130 76.9


line true false branch
31 1533 10276 if @_ > 0
43 0 0 $@ ? :
91 2 17 if ($self->is_empty)
100 6 14 $lower == $upper ? :
120 95 100 unless $self->_contains($i)
130 1 6 if $self->_contains($i)
145 0 30444 if (scalar(@ranges) % 2 == 1)
162 6447 1652 if (ref $first eq 'AlignDB::IntSpanXS') { }
806 846 elsif (&isint($first)) { }
166 38 768 if (scalar @_ > 0) { }
200 861 0 if (ref $first eq 'AlignDB::IntSpanXS') { }
0 0 elsif (&isint($first)) { }
204 0 0 if (scalar @_ > 0) { }
292 40 88 if ($self->edge_size != $supplied->edge_size)
300 18 250 if ($edges_a[$i] != $edges_b[$i])
329 9 27 $result ? :
338 9 27 $result ? :
344 8 13 if ($index == 0 or abs $index > $self->cardinality)
347 7 6 $index < 0 ? :
365 3 6 if ($index > $element_before + $span_size) { }
390 5 7 if ($index > $element_after + $span_size) { }
415 8 8 if ($member >= $lower and $member <= $upper) { }
432 2 9 if ($from < 1)
453 45 30 if ($offset <= $span_size) { }
463 11 45 unless @edges
482 8 37 unless (defined $length)
486 2 35 if ($length <= 0)
496 28 26 if ($length <= $span_size) { }
505 28 7 if (@$edges_ref)
516 0 63 if ($self->is_empty) { }
527 0 63 if ($self->is_empty) { }
541 60 90 if (&$code_ref())
558 210 0 if (defined $element)
595 0 0 $_ > $end ? :
0 0 $_ < $start ? :
608 5 1 if ($self->is_not_empty)
619 1 13 if ($self->is_empty or $self->is_universal) { }
628 13 0 if ($c_set->is_neg_inf)
633 13 0 if ($c_set->is_pos_inf)
652 34 4 if ($lower != $self->NEG_INF)
655 34 4 if ($upper != $self->POS_INF)
658 32 6 if $lower <= $upper
692 8 0 if ($maxlength > 0)
694 9 2 if ($hole->size <= $maxlength)
712 0 28 unless $self->size and $supplied->size
715 4 24 if $overlap
722 9 20 $d1 < $d2 ? :
723 27 2 if (not defined $min_d or $d < $min_d)
737 4 7 if (ref $supplied eq 'AlignDB::IntSpanXS') { }
7 0 elsif (&isint($supplied)) { }
758 5 2 if ($pos & 1)
772 4 0 if ($self->overlap($supplied))
774 5 3 if $subset->overlap($supplied)
785 3 7 if (ref $supplied eq 'AlignDB::IntSpanXS') { }
7 0 elsif (&isint($supplied)) { }
798 2 17 if $s->overlap($ss)
800 14 3 if (not defined $min_d or $d <= $min_d)
801 2 12 if (defined $min_d and $d == $min_d) { }
819 5 8 if $index == 0 or abs $index > $self->span_size
823 1 7 $index < 0 ? :
853 0 0 if $runlist eq $self->EMPTY_STRING
858 0 0 if ($run =~ /^ (-?\d+) $/x) { }
0 0 elsif ($run =~ /^ (-?\d+) - (-?\d+) $/x) { }
862 0 0 if $1 > $2
878 722 4 if (defined $supplied and ref $supplied eq 'AlignDB::IntSpanXS') { }