| line |
true |
false |
branch |
|
63
|
0 |
66 |
if $assoc_end->{'join_cols'} and not @{$assoc_end->{'join_cols'};} |
|
72
|
2 |
64 |
unless $self->{$_}{'role'} |
|
77
|
2 |
31 |
if ($self->{'A'}{'multiplicity'}[1] > 1 and $self->{'B'}{'multiplicity'}[1] > 1) { } |
|
86
|
3 |
28 |
if ($self->{'A'}{'multiplicity'}[1] > 1) { } |
|
|
26 |
2 |
elsif ($self->{'B'}{'multiplicity'}[1] > 1) { } |
|
96
|
0 |
31 |
unless @{$self->{'A'}{'join_cols'};} == @{$self->{'B'}{'join_cols'};} |
|
104
|
14 |
19 |
if $self->{'kind'} eq "Composition" |
|
108
|
0 |
0 |
unless $self->{'A'}{'role'} or $self->{'B'}{'role'} |
|
109
|
31 |
2 |
if $self->{'B'}{'role'} |
|
110
|
33 |
0 |
if $self->{'A'}{'role'} |
|
134
|
0 |
66 |
if ref $assoc_end->{'multiplicity'} |
|
137
|
0 |
66 |
unless $assoc_end->{'multiplicity'} =~ /^(?: # optional part
(\d+) # minimum
\s*\.\.\s* # followed by ".."
)? # end of optional part
(\d+|\*|n) # maximum
$/x |
|
148
|
33 |
31 |
$max_is_star ? : |
|
|
2 |
64 |
defined $1 ? : |
|
149
|
33 |
33 |
$max_is_star ? : |
|
160
|
0 |
4 |
unless @path == 2 |
|
191
|
29 |
31 |
if ($self->{$to}{'multiplicity'}[1] > 1) |
|
198
|
0 |
6 |
unless ref $source |
|
204
|
2 |
10 |
unless ref $record |
|
207
|
0 |
10 |
if grep {exists $record->{$_};} @$to_cols |
|
232
|
0 |
14 |
unless $self->_multiplicity_is_exactly_1("A") |
|
234
|
0 |
14 |
if $self->_multiplicity_is_exactly_1("B") |
|
238
|
14 |
0 |
unless $self->{'B'}{'table'}{'path'} |
|
239
|
0 |
0 |
if ($path->association->kind eq "Composition" and $path->direction eq "BA" and ($path->multiplicity)[0] > 0) |