| line |
true |
false |
branch |
|
458
|
1 |
1 |
unless defined $main::RD_ERRORS |
|
459
|
1 |
1 |
unless defined $main::RD_WARN |
|
460
|
2 |
0 |
unless defined $main::RD_HINT |
|
462
|
0 |
2 |
$translator->trace ? : |
|
468
|
0 |
2 |
unless defined $result |
|
469
|
0 |
2 |
if $DEBUG |
|
478
|
0 |
12 |
unless my $table = $schema->add_table("name", $tdata->{'name'}) |
|
498
|
0 |
48 |
unless my $field = $table->add_field("name", $fdata->{'name'}, "data_type", $fdata->{'data_type'}, "size", $fdata->{'size'}, "default_value", $fdata->{'default'}, "is_auto_increment", $fdata->{'is_auto_inc'}, "is_nullable", $fdata->{'nullable'}, "comments", $fdata->{'comments'}) |
|
501
|
0 |
48 |
if $fdata->{'is_primary_key'} |
|
504
|
0 |
192 |
if (my $val = $fdata->{$qual} || $$fdata{uc $qual}) |
|
505
|
0 |
0 |
if ref $val eq "ARRAY" and not @$val |
|
510
|
0 |
48 |
if ($field->data_type =~ /(set|enum)/i and not $field->size) |
|
513
|
0 |
0 |
unless $extra{'list'} |
|
514
|
0 |
0 |
if $len > $longest |
|
516
|
0 |
0 |
if $longest |
|
520
|
0 |
0 |
unless $cdata->{'type'} eq "foreign_key" |
|
526
|
11 |
1 |
unless $tdata->{'indices'} |
|
530
|
0 |
1 |
unless my $index = $table->add_index("name", $idata->{'name'}, "type", uc $idata->{'type'}, "fields", $idata->{'fields'}) |
|
534
|
7 |
5 |
unless $tdata->{'constraints'} |
|
543
|
0 |
7 |
unless my $constraint = $table->add_constraint("name", $cdata->{'name'}, "type", $cdata->{'type'}, "fields", $cdata->{'fields'}, "reference_table", $cdata->{'reference_table'}, "reference_fields", $cdata->{'reference_fields'}, "match_type", $cdata->{'match_type'} || '', "on_delete", $cdata->{'on_delete'} || $cdata->{'on_delete_do'}, "on_update", $cdata->{'on_update'} || $cdata->{'on_update_do'}) |