Branch Coverage

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


line true false branch
640 5 1 unless defined $main::RD_ERRORS
643 5 1 unless defined $main::RD_WARN
646 6 0 unless defined $main::RD_HINT
649 0 6 $translator->trace ? :
655 0 6 unless defined $result
656 0 6 if ($DEBUG)
669 0 30 unless $tdata->{'table_name'}
672 0 30 unless my $table = $schema->add_table("name", $tdata->{'table_name'}, "comments", $tdata->{'comments'})
691 0 185 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'})
695 18 12 unless $indices->{$table_name}
697 29 1 unless $constraints->{$table_name}
699 0 30 unless $tdata->{'indices'}
703 0 18 unless my $index = $table->add_index("name", $idata->{'name'}, "type", uc $idata->{'type'}, "fields", $idata->{'fields'})
707 0 30 unless $tdata->{'constraints'}
717 0 61 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'})