| line |
true |
false |
branch |
|
225
|
0 |
0 |
if (@_ == 1 and ref $_[0] eq 'ARRAY') { }
|
|
233
|
0 |
0 |
if ($self->graph->has_edge_attribute(@vector, 'object'))
|
|
243
|
0 |
0 |
if $relationship->colocated
|
|
259
|
0 |
0 |
if ($rel)
|
|
260
|
0 |
0 |
if ($self->type($rel->type)->is_weak) { }
|
|
|
0 |
0 |
elsif ($rel->type ne $options->{'type'}) { }
|
|
274
|
0 |
0 |
unless $reltype
|
|
276
|
0 |
0 |
if $rel->nonlocal and not $reltype->is_generalizable
|
|
279
|
0 |
0 |
if $rel->nonlocal
|
|
295
|
0 |
0 |
if ($r)
|
|
314
|
0 |
0 |
if (exists $self->scopedrels->{$first}{$second})
|
|
642
|
0 |
0 |
if $source eq $target
|
|
643
|
0 |
0 |
if $sourceobj->is_meta or $targetobj->is_meta
|
|
650
|
0 |
0 |
if (ref $options eq 'Text::Tradition::Collation::Relationship') { }
|
|
657
|
0 |
0 |
unless ($is_valid)
|
|
670
|
0 |
0 |
if (exists $options->{'scope'} and $options->{'scope'} ne 'local')
|
|
672
|
0 |
0 |
if ($rdga eq $rdgb)
|
|
681
|
0 |
0 |
if ($otherrel and $otherrel->type eq $options->{'type'} and $otherrel->scope eq $options->{'scope'}) { }
|
|
|
0 |
0 |
elsif ($otherrel) { }
|
|
692
|
0 |
0 |
unless $relationship
|
|
698
|
0 |
0 |
unless ($is_valid)
|
|
708
|
0 |
0 |
if ($rel and $rel ne $relationship)
|
|
709
|
0 |
0 |
if ($rel->nonlocal) { }
|
|
|
0 |
0 |
elsif (not $reltype->is_weak) { }
|
|
713
|
0 |
0 |
$rel->has_annotation ? :
|
|
714
|
0 |
0 |
$relationship->has_annotation ? :
|
|
715
|
0 |
0 |
unless ($rel->type eq $relationship->type and $r1ann eq $r2ann)
|
|
723
|
0 |
0 |
unless $skip
|
|
727
|
0 |
0 |
if ($relationship->colocated and $relationship->nonlocal and not $thispaironly)
|
|
731
|
0 |
0 |
if ($propagate)
|
|
737
|
0 |
0 |
if @prop
|
|
756
|
0 |
0 |
unless $relationship->nonlocal
|
|
758
|
0 |
0 |
unless $reltype->is_generalizable
|
|
765
|
0 |
0 |
$exists ? :
|
|
766
|
0 |
0 |
if ($exists and not $etype->is_weak) { }
|
|
767
|
0 |
0 |
unless ($exists->is_equivalent($relationship))
|
|
774
|
0 |
0 |
if ($TryCatch::Error)
|
|
779
|
0 |
0 |
if @added
|
|
811
|
0 |
0 |
if (@itarget)
|
|
814
|
0 |
0 |
if (@itarget)
|
|
821
|
0 |
0 |
if keys %all_targets
|
|
841
|
0 |
0 |
unless $rel
|
|
846
|
0 |
0 |
if ($rel->nonlocal and $allscope)
|
|
862
|
0 |
0 |
if $equiv
|
|
875
|
0 |
0 |
unless $mustdrop
|
|
879
|
0 |
0 |
unless $c->tradition->_initialized
|
|
882
|
0 |
0 |
if ($rel eq 'transposition' or $rel eq 'repetition')
|
|
889
|
0 |
0 |
if ($seen_wits{$w})
|
|
890
|
0 |
0 |
if $rel eq 'transposition'
|
|
892
|
0 |
0 |
if $rel eq 'repetition'
|
|
895
|
0 |
0 |
if $rel eq 'repetition'
|
|
898
|
0 |
0 |
if ($reltype->is_colocation) { }
|
|
904
|
0 |
0 |
$sourceobj->has_rank ? :
|
|
905
|
0 |
0 |
$targetobj->has_rank ? :
|
|
906
|
0 |
0 |
unless ($rel eq 'collated' or $sourcerank == $targetrank)
|
|
909
|
0 |
0 |
if ($c->end->has_rank)
|
|
916
|
0 |
0 |
unless ($self->test_equivalence($source, $target))
|
|
924
|
0 |
0 |
if ($self->test_equivalence($source, $target)) { }
|
|
937
|
0 |
0 |
if ($self->type($nrel->type)->is_weak)
|
|
968
|
0 |
0 |
if $rel->colocated
|
|
971
|
0 |
0 |
unless ($ok)
|
|
989
|
0 |
0 |
if (ref $reading eq 'Text::Tradition::Collation::Reading')
|
|
994
|
0 |
0 |
if ($filter) { }
|
|
996
|
0 |
0 |
if ($filter eq 'colocated') { }
|
|
|
0 |
0 |
elsif (not ref $filter) { }
|
|
1007
|
0 |
0 |
if ($return_object) { }
|
|
1029
|
0 |
0 |
@rel > 1 ? :
|
|
1033
|
0 |
0 |
unless $reltype->is_transitive
|
|
1046
|
0 |
0 |
if not exists $thislevel{$_} and $self->get_relationship($r, $_)
|
|
1062
|
0 |
0 |
if ($existing)
|
|
1064
|
0 |
0 |
unless ($extype->is_weak)
|
|
1067
|
0 |
0 |
unless $existing->type eq $relobj->type or $extype->bindlevel <= $reltype->bindlevel
|
|
1075
|
0 |
0 |
unless ($skip)
|
|
1081
|
0 |
0 |
if ('TryCatch'->check_tc('Text::Tradition::Error')) { }
|
|
|
0 |
0 |
if ($TryCatch::Error)
|
|
1095
|
0 |
0 |
unless $crel
|
|
1097
|
0 |
0 |
if ($crt->is_transitive and $crt->is_colocation == $colo)
|
|
1098
|
0 |
0 |
if $crt->bindlevel == $reltype->bindlevel
|
|
1099
|
0 |
0 |
$crt->bindlevel < $reltype->bindlevel ? :
|
|
1110
|
0 |
0 |
if $sib eq $r
|
|
1111
|
0 |
0 |
if $sib eq $nr
|
|
1116
|
0 |
0 |
if ($existing)
|
|
1122
|
0 |
0 |
unless ($extype->is_weak)
|
|
1123
|
0 |
0 |
if ($nrtype ne $extype->name and $self->type($nrtype)->bindlevel <= $extype->bindlevel)
|
|
1133
|
0 |
0 |
unless ($skip)
|
|
1139
|
0 |
0 |
if ('TryCatch'->check_tc('Text::Tradition::Error')) { }
|
|
|
0 |
0 |
if ($TryCatch::Error)
|
|
1163
|
0 |
0 |
if ($self->type($relobj->type)->is_transitive)
|
|
1176
|
0 |
0 |
if $bt->is_weak and not $at->is_weak
|
|
1177
|
0 |
0 |
if $at->is_weak and not $bt->is_weak
|
|
1195
|
0 |
0 |
$edge->[0] eq $deleted ? :
|
|
1196
|
0 |
0 |
if $vector[0] eq $vector[1]
|
|
1199
|
0 |
0 |
if $combined
|
|
1203
|
0 |
0 |
if $rel
|
|
1218
|
0 |
0 |
if (@$nodelist == 1 and $nodelist->[0] eq $node) { }
|
|
|
0 |
0 |
elsif (@$nodelist == 1) { }
|
|
1273
|
0 |
0 |
if $seq eq $teq
|
|
1280
|
0 |
0 |
if $pred eq $teq
|
|
1284
|
0 |
0 |
if $succ eq $teq
|
|
1288
|
0 |
0 |
if $self->_is_disconnected and $self->collation->tradition->_initialized
|
|
1315
|
0 |
0 |
if $seq eq $teq
|
|
1321
|
0 |
0 |
if ($self->equivalence_graph->has_edge($pred, $teq)) { }
|
|
1329
|
0 |
0 |
if ($self->equivalence_graph->has_edge($teq, $succ)) { }
|
|
1344
|
0 |
0 |
if $added_pred{$pred}
|
|
1348
|
0 |
0 |
if $added_succ{$succ}
|
|
1350
|
0 |
0 |
unless ($self->equivalence_graph->eq($checkstr))
|
|
1368
|
0 |
0 |
if exists $sng{$el}
|
|
1374
|
0 |
0 |
$keepsource ? :
|
|
1376
|
0 |
0 |
if ($keepsource) { }
|
|
1402
|
0 |
0 |
unless $self->equivalence($rp)
|
|
1406
|
0 |
0 |
unless $self->equivalence($rs)
|
|
1415
|
0 |
0 |
unless $self->equivalence($rp)
|
|
1419
|
0 |
0 |
unless $self->equivalence($rs)
|
|
1424
|
0 |
0 |
unless ($old_pred{$p})
|
|
1429
|
0 |
0 |
unless ($old_succ{$s})
|
|
1434
|
0 |
0 |
if $self->_is_disconnected and $self->collation->tradition->_initialized
|
|
1447
|
0 |
0 |
if $r eq $second
|
|
1448
|
0 |
0 |
if ($self->get_relationship($r, $nr)->colocated)
|
|
1449
|
0 |
0 |
unless exists $found{$nr}
|
|
1493
|
0 |
0 |
unless $relobj and $relobj->colocated
|
|
1529
|
0 |
0 |
unless exists $node_ranks->{$c}
|
|
1531
|
0 |
0 |
if exists $node_ranks->{$child}
|
|
1535
|
0 |
0 |
if (exists $node_ranks->{$parent}) { }
|
|
1537
|
0 |
0 |
if $highest_rank <= $node_ranks->{$parent}
|
|
1543
|
0 |
0 |
if $skip
|
|
1546
|
0 |
0 |
if $node_ranks
|
|
1547
|
0 |
0 |
if $rank_nodes
|
|
1583
|
0 |
0 |
unless exists $$node_hash{$e->[0]} and exists $$node_hash{$e->[1]}
|
|
1592
|
0 |
0 |
if defined $value
|
|
1609
|
0 |
0 |
unless defined $value
|
|
1617
|
0 |
0 |
unless open DUMP, '>debug.svg'
|