| line |
true |
false |
branch |
|
116
|
0 |
34 |
unless my $table = $schema->add_table(get_tagfields($xp, $tblnode, "sqlf:", ("name", "order", "extra"))) |
|
131
|
76 |
86 |
if (exists $fdata{'default_value'} and defined $fdata{'default_value'}) |
|
133
|
0 |
76 |
if ($fdata{'default_value'} =~ /^\s*NULL\s*$/) { } |
|
|
0 |
76 |
elsif ($fdata{'default_value'} =~ /^\s*EMPTY_STRING\s*$/) { } |
|
140
|
0 |
162 |
unless my $field = $table->add_field(%fdata) |
|
142
|
32 |
130 |
if $fdata{'is_primary_key'} |
|
161
|
0 |
69 |
unless $table->add_constraint(%data) |
|
170
|
0 |
14 |
unless $table->add_index(%data) |
|
190
|
0 |
14 |
unless $schema->add_view(%data) |
|
206
|
1 |
12 |
if (my $evt = $data{'database_event'} and $translator->{'show_warnings'}) |
|
214
|
18 |
12 |
if (my $evts = $data{'database_events'}) |
|
218
|
0 |
30 |
unless $schema->add_trigger(%data) |
|
227
|
0 |
14 |
unless $schema->add_procedure(%data) |
|
245
|
337 |
2950 |
if (/:$/) |
|
246
|
0 |
2950 |
s/(^.*?:)// ? : |
|
248
|
571 |
2379 |
/^(sql|comments|action|extra)$/ ? : |
|
252
|
1569 |
1381 |
if (my $found = $xp->find($attrib_path, $node)) { } |
|
|
258 |
1123 |
elsif ($found = $xp->find($tag_path, $node)) { } |
|
254
|
0 |
1569 |
unless $is_attrib |
|
258
|
1569 |
0 |
defined $data{$_} ? : |
|
260
|
159 |
99 |
if ($_ eq 'extra') { } |
|
269
|
0 |
258 |
if $is_attrib |
|
273
|
258 |
0 |
defined $data{$_} ? : |
|
277
|
337 |
0 |
wantarray ? : |