Branch Coverage

blib/lib/Graph/ModularDecomposition.pm
Criterion Covered Total %
branch 166 176 94.3


line true false branch
137 13 12 if (ref $class)
139 13 12 $MD_Debug ? :
13 12 $MD_Debug ? :
167 162 0 if (ref $class)
169 161 1 unless defined $cf
187 65 314 ref $self ? :
213 5 23 if (ref $class)
217 13 15 index($pairs, '-') >= 0 ? :
220 40 221 if $MD_Debug > 2
221 254 7 if ($q) { }
222 251 3 unless $g->has_edge($p, $q)
224 4 3 unless $g->has_vertex($p)
249 3 36 if $MD_Debug
267 49 1264 if $MD_Debug > 1
271 49 1264 if $MD_Debug > 1
290 23 562 if $MD_Debug > 1
292 367 4 unless grep(($x eq $_), @X)
294 23 562 if $MD_Debug > 1
314 1 79 if ($MD_Debug > 2)
316 1 79 if ($MD_Debug > 1)
339 3 121 if $MD_Debug > 1
340 3 121 if $MD_Debug > 1
342 3 121 if $MD_Debug > 1
344 3 121 if $MD_Debug > 1
345 19 105 if ($newnode ne $a)
348 1 15 if $MD_Debug > 2
349 16 0 unless $GP->has_edge($p, $newnode)
353 4 34 if $MD_Debug > 2
354 38 0 unless $GP->has_edge($newnode, $p)
378 19 455 if $MD_Debug > 1
381 33 754 if $MD_Debug > 2
382 187 600 if ($G->has_edge($w, $x)) { }
383 2 185 if ($G->has_edge($x, $w)) { }
385 1 1 if $MD_Debug > 2
388 6 179 if $MD_Debug > 2
391 180 420 if ($G->has_edge($x, $w)) { }
393 7 173 if $MD_Debug > 2
396 19 401 if $MD_Debug > 2
417 2 64 if $MD_Debug > 1
420 2 64 if $MD_Debug > 1
423 2 64 if $MD_Debug > 1
428 19 448 if $MD_Debug > 1
431 23 560 if $MD_Debug > 1
434 401 182 if (@{$tempset;}) { }
435 17 384 if $MD_Debug > 1
459 10 340 if $MD_Debug > 1
460 10 340 if $MD_Debug > 1
461 10 340 if $MD_Debug > 1
462 10 340 if $MD_Debug > 1
465 10 340 if $MD_Debug > 1
484 3 46 if $MD_Debug
486 49 131 if $v eq $x
487 3 128 if $MD_Debug > 1
490 262 340 if $v eq $y or $x eq $y
491 6 334 if $MD_Debug > 1
492 182 158 if ($g->distinguishes($x, $y, $v))
493 182 0 unless $G->has_edge($x, $y)
497 3 46 if $MD_Debug
516 6 174 unless defined $t->{'type'}
517 49 125 if $t->{'type'} ne 'leaf'
518 10 164 if $t->{'type'} eq 'complete'
520 49 125 if ($t->{'type'} ne 'leaf')
578 9 105 if $MD_Debug
580 7 2 defined $v ? :
9 105 if $MD_Debug
583 3 111 unless ($v)
584 2 1 if $MD_Debug
590 111 0 if ($g->canonical_form) { }
597 73 38 if (scalar $g->vertices == 1)
598 5 68 if $MD_Debug
606 2 36 if $MD_Debug
608 2 36 if $MD_Debug
613 2 47 if $MD_Debug
618 49 0 if ($g->canonical_form) { }
634 77 0 unless grep(($F eq $_), @F)
637 2 47 if $MD_Debug
638 11 38 if (@f == 1 and @F > 1) { }
643 10 28 if ($g->has_edge($v, $x) == $g->has_edge($x, $v)) { }
645 0 10 $g->has_edge($v, $x) ? :
651 2 47 if $MD_Debug
655 4 73 if (defined $m->{'col'} and $u->{'col'} eq $m->{'col'} and $u->{'type'} eq 'complete' && $m->{'type'} eq 'complete' || $u->{'type'} eq 'linear' && $m->{'type'} eq 'linear') { }
662 0 4 if ($MD_Debug)
679 2 36 if $MD_Debug
704 3 33 unless $g->check_transitive
706 7 26 if $s =~ /^primitive\[[^\]]+\]\([^\(]*$/
707 1 25 if $s =~ /primitive/ and $s =~ /complete_|linear/
708 24 1 unless $s =~ /primitive|complete_1/
709 1 0 if $s =~ /primitive|complete_1/