Branch Coverage

blib/lib/SQL/Translator/Parser/Oracle.pm
Criterion Covered Total %
branch 19 30 63.3


line true false branch
625 3 1 unless defined $main::RD_ERRORS
626 3 1 unless defined $main::RD_WARN
627 4 0 unless defined $main::RD_HINT
629 0 4 $translator->trace ? :
635 0 4 unless defined $result
636 0 4 if ($DEBUG)
651 0 10 unless $tdata->{'table_name'}
654 0 10 unless my $table = $schema->add_table("name", $tdata->{'table_name'}, "comments", $tdata->{'comments'})
674 0 35 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->{'null'}, "comments", $fdata->{'comments'})
678 8 2 unless $indices->{$table_name}
680 9 1 unless $constraints->{$table_name}
682 0 10 unless $tdata->{'indices'}
686 0 2 unless my $index = $table->add_index("name", $idata->{'name'}, "type", uc $idata->{'type'}, "fields", $idata->{'fields'})
690 0 10 unless $tdata->{'constraints'}
702 0 23 unless my $constraint = $table->add_constraint("name", $cdata->{'name'}, "type", $cdata->{'type'}, "fields", $cdata->{'fields'}, "expression", $cdata->{'expression'}, "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'})