line |
true |
false |
branch |
44
|
0 |
6307 |
unless $_[0]->name |
88
|
3 |
557 |
if (UNIVERSAL::isa($_[0], $constraint_class)) { } |
95
|
0 |
557 |
unless $constraint = $constraint_class->new(\%args) |
105
|
78 |
482 |
if ($pk and $constraint->type eq 'PRIMARY KEY') { } |
|
210 |
272 |
elsif ($constraint->type eq 'PRIMARY KEY') { } |
107
|
0 |
78 |
if $constraint->name |
109
|
17 |
61 |
if keys %extra |
115
|
234 |
0 |
if (my $f = $self->get_field($fname)) |
142
|
482 |
78 |
if ($ok) |
164
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $constraint_class)) { } |
171
|
1 |
2 |
unless ($self->_has_constraints and grep {$_->name eq $constraint_name;} @{$self->_constraints;}) |
211
|
3 |
125 |
if (UNIVERSAL::isa($_[0], $index_class)) { } |
218
|
0 |
125 |
unless $index = $index_class->new(\%args) |
222
|
0 |
63 |
if $ex_index->equals($index) |
243
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $index_class)) { } |
250
|
1 |
2 |
unless ($self->_has_indices and grep {$_->name eq $index_name;} @{$self->_indices;}) |
295
|
7 |
1376 |
if (UNIVERSAL::isa($_[0], $field_class)) { } |
302
|
1 |
1375 |
unless $field = $field_class->new(\%args) |
309
|
181 |
1201 |
if ($field->order) { } |
310
|
1 |
180 |
if ($$existing_order{$field->order}) |
321
|
1 |
1200 |
if ($last_field_no != scalar keys %$existing_order) |
334
|
2 |
1378 |
if ($self->get_field($field_name)) { } |
359
|
1 |
2 |
if (UNIVERSAL::isa($_[0], $field_class)) { } |
368
|
1 |
2 |
unless ($self->_has_fields and exists $self->_fields->{$field_name}) |
374
|
2 |
0 |
if ($cascade) |
439
|
1897 |
638 |
if ($self->_has_constraints) { } |
441
|
1895 |
2 |
wantarray ? : |
460
|
192 |
371 |
if ($self->_has_indices) { } |
462
|
191 |
1 |
wantarray ? : |
481
|
0 |
4901 |
unless my $field_name = shift() |
483
|
341 |
4560 |
unless $self->_has_fields |
485
|
1 |
4559 |
if ($case_insensitive) |
488
|
1 |
1 |
if $field_name eq uc $field |
493
|
1127 |
3432 |
unless exists $self->_fields->{$field_name} |
511
|
1937 |
324 |
$self->_has_fields ? : |
513
|
1937 |
324 |
if (@fields) { } |
514
|
1880 |
57 |
wantarray ? : |
532
|
0 |
59 |
unless $self->name |
533
|
2 |
57 |
unless $self->get_fields |
538
|
3 |
324 |
unless $object->is_valid |
556
|
1 |
2 |
if $self->is_data |
561
|
1 |
4 |
unless $field->is_foreign_key |
566
|
1 |
2 |
if ($fk{$referenced} > 1) |
588
|
2 |
2 |
unless ($field->is_primary_key or $field->is_foreign_key) |
610
|
0 |
3 |
if defined $self->_can_link->{$table1->name}{$table2->name} |
612
|
0 |
3 |
if ($self->is_data == 1) |
621
|
6 |
1 |
if ($field->is_foreign_key) |
627
|
1 |
2 |
unless (defined $fk{$table1->name} and defined $fk{$table2->name}) |
635
|
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)) { } |
761
|
206 |
1287 |
if (@$fields) |
763
|
6 |
209 |
unless $self->get_field($f) |
769
|
87 |
10 |
if ($c->type eq "PRIMARY KEY") |
776
|
113 |
87 |
unless ($has_pk) |
777
|
0 |
113 |
unless $constraint = $self->add_constraint("type", "PRIMARY KEY", "fields", $fields) |
784
|
200 |
1287 |
if ($constraint) { } |
789
|
840 |
239 |
if $c->type eq "PRIMARY KEY" |
843
|
3 |
0 |
if (@fields) { } |
844
|
3 |
0 |
wantarray ? : |
868
|
0 |
0 |
unless $self->SUPER::equals($other) |
869
|
0 |
0 |
$case_insensitive ? : |
|
0 |
0 |
unless $case_insensitive ? uc $self->name eq uc $other->name : $self->name eq $other->name |
870
|
0 |
0 |
unless $self->_compare_objects(scalar $self->options, scalar $other->options) |
871
|
0 |
0 |
unless $self->_compare_objects(scalar $self->extra, scalar $other->extra) |
878
|
0 |
0 |
unless $field->equals($otherField, $case_insensitive) |
883
|
0 |
0 |
if $checkedFields{$otherField->name} |
893
|
0 |
0 |
if ($constraint->equals($otherConstraint, $case_insensitive)) |
903
|
0 |
0 |
if $checkedFields{$otherConstraint} |
905
|
0 |
0 |
if ($otherConstraint->equals($constraint, $case_insensitive)) |
918
|
0 |
0 |
if ($index->equals($otherIndex, $case_insensitive)) |
928
|
0 |
0 |
if $checkedIndices{$otherIndex} |
930
|
0 |
0 |
if ($otherIndex->equals($index, $case_insensitive)) |
984
|
3 |
0 |
wantarray ? : |
991
|
1 |
0 |
wantarray ? : |
997
|
1 |
0 |
wantarray ? : |
1004
|
3 |
0 |
wantarray ? : |
1011
|
1 |
0 |
wantarray ? : |
1017
|
2 |
0 |
wantarray ? : |
1023
|
2 |
0 |
wantarray ? : |