| line |
true |
false |
branch |
|
294
|
1 |
1 |
unless defined $main::RD_ERRORS |
|
295
|
1 |
1 |
unless defined $main::RD_WARN |
|
296
|
1 |
1 |
unless defined $main::RD_HINT |
|
298
|
0 |
2 |
$translator->trace ? : |
|
304
|
1 |
1 |
unless defined $result |
|
305
|
0 |
1 |
if $DEBUG |
|
314
|
0 |
9 |
unless my $table = $schema->add_table('name', $tdata->{'name'}) |
|
334
|
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'}) |
|
337
|
0 |
40 |
if $fdata->{'is_primary_key'} |
|
340
|
0 |
160 |
if (my $val = $fdata->{$qual} || $$fdata{uc $qual}) |
|
341
|
0 |
0 |
if ref $val eq 'ARRAY' and not @$val |
|
346
|
0 |
40 |
if ($field->data_type =~ /(set|enum)/i and not $field->size) |
|
349
|
0 |
0 |
unless $extra{'list'} |
|
350
|
0 |
0 |
if $len > $longest |
|
352
|
0 |
0 |
if $longest |
|
356
|
0 |
0 |
unless $cdata->{'type'} eq 'foreign_key' |
|
362
|
8 |
1 |
unless $tdata->{'indices'} |
|
366
|
0 |
1 |
unless my $index = $table->add_index('name', $idata->{'name'}, 'type', uc $idata->{'type'}, 'fields', $idata->{'fields'}) |
|
370
|
7 |
2 |
unless $tdata->{'constraints'} |
|
379
|
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'}) |