| line |
true |
false |
branch |
|
44
|
0 |
7089 |
unless $_[0]->name |
|
88
|
3 |
611 |
if (UNIVERSAL::isa($_[0], $constraint_class)) { } |
|
94
|
0 |
611 |
unless $constraint = $constraint_class->new(\%args) |
|
104
|
79 |
535 |
if ($pk and $constraint->type eq 'PRIMARY KEY') { } |
|
|
237 |
298 |
elsif ($constraint->type eq 'PRIMARY KEY') { } |
|
106
|
0 |
79 |
if $constraint->name |
|
108
|
17 |
62 |
if keys %extra |
|
113
|
270 |
0 |
if (my $f = $self->get_field($fname)) |
|
140
|
535 |
79 |
if ($ok) |
|
162
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $constraint_class)) { } |
|
168
|
1 |
2 |
unless ($self->_has_constraints and grep {$_->name eq $constraint_name;} @{$self->_constraints;}) |
|
209
|
3 |
154 |
if (UNIVERSAL::isa($_[0], $index_class)) { } |
|
215
|
0 |
154 |
unless $index = $index_class->new(\%args) |
|
219
|
0 |
89 |
if $ex_index->equals($index) |
|
240
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $index_class)) { } |
|
246
|
1 |
2 |
unless ($self->_has_indices and grep {$_->name eq $index_name;} @{$self->_indices;}) |
|
291
|
7 |
1550 |
if (UNIVERSAL::isa($_[0], $field_class)) { } |
|
297
|
1 |
1549 |
unless $field = $field_class->new(\%args) |
|
304
|
203 |
1353 |
if ($field->order) { } |
|
305
|
1 |
202 |
if ($$existing_order{$field->order}) |
|
315
|
1 |
1352 |
if ($last_field_no != scalar keys %$existing_order) |
|
328
|
2 |
1552 |
if ($self->get_field($field_name)) { } |
|
352
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $field_class)) { } |
|
360
|
1 |
2 |
unless ($self->_has_fields and exists $self->_fields->{$field_name}) |
|
366
|
2 |
0 |
if ($cascade) |
|
433
|
2105 |
673 |
if ($self->_has_constraints) { } |
|
434
|
2103 |
2 |
wantarray ? : |
|
452
|
228 |
400 |
if ($self->_has_indices) { } |
|
454
|
227 |
1 |
wantarray ? : |
|
472
|
0 |
5520 |
unless my $field_name = shift() |
|
474
|
368 |
5152 |
unless $self->_has_fields |
|
476
|
1 |
5151 |
if ($case_insensitive) |
|
479
|
1 |
1 |
if $field_name eq uc $field |
|
484
|
1280 |
3871 |
unless exists $self->_fields->{$field_name} |
|
500
|
2115 |
351 |
$self->_has_fields ? : |
|
502
|
2115 |
351 |
if (@fields) { } |
|
503
|
2058 |
57 |
wantarray ? : |
|
520
|
0 |
59 |
unless $self->name |
|
521
|
2 |
57 |
unless $self->get_fields |
|
524
|
3 |
324 |
unless $object->is_valid |
|
542
|
1 |
2 |
if $self->is_data |
|
547
|
1 |
4 |
unless $field->is_foreign_key |
|
552
|
1 |
2 |
if ($fk{$referenced} > 1) |
|
574
|
2 |
2 |
unless ($field->is_primary_key or $field->is_foreign_key) |
|
596
|
0 |
3 |
if defined $self->_can_link->{$table1->name}{$table2->name} |
|
598
|
0 |
3 |
if ($self->is_data == 1) |
|
607
|
6 |
1 |
if ($field->is_foreign_key) |
|
612
|
1 |
2 |
unless (defined $fk{$table1->name} and defined $fk{$table2->name}) |
|
619
|
1 |
1 |
if (scalar(@{$fk{$table1->name};} == 1) and scalar(@{$fk{$table2->name};} == 1)) { } |
|
|
0 |
1 |
elsif (scalar(@{$fk{$table1->name};} > 1) and scalar(@{$fk{$table2->name};} == 1)) { } |
|
|
0 |
1 |
elsif (scalar(@{$fk{$table1->name};} == 1) and scalar(@{$fk{$table2->name};} > 1)) { } |
|
|
1 |
0 |
elsif (scalar(@{$fk{$table1->name};} > 1) and scalar(@{$fk{$table2->name};} > 1)) { } |
|
729
|
213 |
1462 |
if (@$fields) |
|
731
|
6 |
216 |
unless $self->get_field($f) |
|
737
|
88 |
10 |
if ($c->type eq "PRIMARY KEY") |
|
744
|
119 |
88 |
unless ($has_pk) |
|
745
|
0 |
119 |
unless $constraint = $self->add_constraint("type", "PRIMARY KEY", "fields", $fields) |
|
752
|
207 |
1462 |
if ($constraint) { } |
|
756
|
986 |
240 |
if $c->type eq "PRIMARY KEY" |
|
808
|
3 |
0 |
if (@fields) { } |
|
809
|
3 |
0 |
wantarray ? : |
|
832
|
0 |
0 |
unless $self->SUPER::equals($other) |
|
833
|
0 |
0 |
$case_insensitive ? : |
|
|
0 |
0 |
unless $case_insensitive ? uc $self->name eq uc $other->name : $self->name eq $other->name |
|
837
|
0 |
0 |
unless $self->_compare_objects(scalar $self->options, scalar $other->options) |
|
839
|
0 |
0 |
unless $self->_compare_objects(scalar $self->extra, scalar $other->extra) |
|
847
|
0 |
0 |
unless $field->equals($otherField, $case_insensitive) |
|
853
|
0 |
0 |
if $checkedFields{$otherField->name} |
|
863
|
0 |
0 |
if ($constraint->equals($otherConstraint, $case_insensitive)) |
|
874
|
0 |
0 |
if $checkedFields{$otherConstraint} |
|
876
|
0 |
0 |
if ($otherConstraint->equals($constraint, $case_insensitive)) |
|
889
|
0 |
0 |
if ($index->equals($otherIndex, $case_insensitive)) |
|
900
|
0 |
0 |
if $checkedIndices{$otherIndex} |
|
902
|
0 |
0 |
if ($otherIndex->equals($index, $case_insensitive)) |
|
956
|
3 |
0 |
wantarray ? : |
|
963
|
1 |
0 |
wantarray ? : |
|
969
|
1 |
0 |
wantarray ? : |
|
975
|
3 |
0 |
wantarray ? : |
|
982
|
1 |
0 |
wantarray ? : |
|
988
|
2 |
0 |
wantarray ? : |
|
994
|
2 |
0 |
wantarray ? : |