| line |
true |
false |
branch |
|
294
|
1 |
1 |
unless defined $main::RD_ERRORS |
|
296
|
1 |
1 |
unless defined $main::RD_WARN |
|
298
|
1 |
1 |
unless defined $main::RD_HINT |
|
301
|
0 |
2 |
$translator->trace ? : |
|
307
|
1 |
1 |
unless defined $result |
|
308
|
0 |
1 |
if $DEBUG |
|
316
|
0 |
9 |
unless my $table = $schema->add_table("name", $tdata->{'name'}) |
|
333
|
0 |
40 |
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'}) |
|
336
|
0 |
40 |
if $fdata->{'is_primary_key'} |
|
339
|
0 |
160 |
if (my $val = $fdata->{$qual} || $$fdata{uc $qual}) |
|
340
|
0 |
0 |
if ref $val eq "ARRAY" and not @$val |
|
345
|
0 |
40 |
if ($field->data_type =~ /(set|enum)/i and not $field->size) |
|
348
|
0 |
0 |
unless $extra{'list'} |
|
349
|
0 |
0 |
if $len > $longest |
|
351
|
0 |
0 |
if $longest |
|
355
|
0 |
0 |
unless $cdata->{'type'} eq "foreign_key" |
|
361
|
8 |
1 |
unless $tdata->{'indices'} |
|
365
|
0 |
1 |
unless my $index = $table->add_index("name", $idata->{'name'}, "type", uc $idata->{'type'}, "fields", $idata->{'fields'}) |
|
369
|
7 |
2 |
unless $tdata->{'constraints'} |
|
378
|
0 |
2 |
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'}) |