| line |
true |
false |
branch |
|
120
|
0 |
34 |
unless my $table = $schema->add_table(get_tagfields($xp, $tblnode, "sqlf:", ("name", "order", "extra"))) |
|
140
|
76 |
86 |
if (exists $fdata{'default_value'} and defined $fdata{'default_value'}) |
|
144
|
0 |
76 |
if ($fdata{'default_value'} =~ /^\s*NULL\s*$/) { } |
|
|
0 |
76 |
elsif ($fdata{'default_value'} =~ /^\s*EMPTY_STRING\s*$/) { } |
|
152
|
0 |
162 |
unless my $field = $table->add_field(%fdata) |
|
154
|
32 |
130 |
if $fdata{'is_primary_key'} |
|
172
|
0 |
69 |
unless $table->add_constraint(%data) |
|
182
|
0 |
14 |
unless $table->add_index(%data) |
|
207
|
0 |
14 |
unless $schema->add_view(%data) |
|
223
|
1 |
12 |
if (my $evt = $data{'database_event'} and $translator->{'show_warnings'}) |
|
234
|
18 |
12 |
if (my $evts = $data{'database_events'}) |
|
238
|
0 |
30 |
unless $schema->add_trigger(%data) |
|
251
|
0 |
14 |
unless $schema->add_procedure(%data) |
|
269
|
337 |
2950 |
if (/:$/) |
|
270
|
0 |
2950 |
s/(^.*?:)// ? : |
|
272
|
571 |
2379 |
/^(sql|comments|action|extra)$/ ? : |
|
276
|
1569 |
1381 |
if (my $found = $xp->find($attrib_path, $node)) { } |
|
|
258 |
1123 |
elsif ($found = $xp->find($tag_path, $node)) { } |
|
278
|
0 |
1569 |
unless $is_attrib |
|
282
|
1569 |
0 |
defined $data{$_} ? : |
|
285
|
159 |
99 |
if ($_ eq 'extra') { } |
|
295
|
0 |
258 |
if $is_attrib |
|
299
|
258 |
0 |
defined $data{$_} ? : |
|
303
|
337 |
0 |
wantarray ? : |