| line |
true |
false |
branch |
|
89
|
0 |
50 |
if ($args->{$deprecated}) |
|
90
|
0 |
0 |
unless $warned_dep++ |
|
97
|
3 |
22 |
if (not $self->output_db) |
|
110
|
0 |
25 |
if $@ |
|
112
|
14 |
11 |
if (my $preprocess = $producer_class->can("preprocess_schema")) |
|
127
|
10 |
69 |
if (my $old_name = $tar_table->extra('renamed_from')) { } |
|
129
|
10 |
0 |
if ($src_table) { } |
|
139
|
12 |
67 |
unless ($src_table) |
|
147
|
0 |
67 |
if $self->case_insensitive |
|
163
|
0 |
82 |
if $self->case_insensitive |
|
166
|
15 |
67 |
unless $src_tables_checked{$src_table_name} |
|
182
|
0 |
22 |
if $@ |
|
199
|
16 |
6 |
if (not $self->no_batch_alters and my $batch_alter = $producer_class->can('batch_alter_table')) { } |
|
227
|
0 |
60 |
unless $flattened_diffs{$_} |
|
|
34 |
26 |
if (@{[] unless $flattened_diffs{$_};}) { } |
|
232
|
50 |
1 |
$_ ? : |
|
|
11 |
41 |
ref $_ eq 'ARRAY' ? : |
|
233
|
3 |
0 |
$self->ignore_missing_methods ? : |
|
|
31 |
3 |
if ($meth) { } |
|
253
|
10 |
12 |
if (my(@tables) = @{$self->tables_to_create;}) |
|
274
|
9 |
13 |
unless $self->{'tables_to_drop'} |
|
|
13 |
9 |
if (my(@tables_to_drop) = @{[] unless $self->{'tables_to_drop'};}) |
|
278
|
0 |
0 |
$self->ignore_missing_methods ? : |
|
|
13 |
0 |
$meth ? : |
|
283
|
18 |
4 |
if (@diffs) { } |
|
290
|
22 |
0 |
if (@diffs) |
|
291
|
4 |
18 |
unless ($self->output_db =~ /^(?:MySQL|SQLite|PostgreSQL)$/) |
|
295
|
2 |
231 |
$_ =~ /;\s*\z/msx ? : |
|
|
233 |
0 |
$_ ? : |
|
298
|
2 |
20 |
wantarray ? : |
|
311
|
16 |
11 |
if ($i_tar->equals($i_src, $self->case_insensitive, $self->ignore_index_names)) |
|
321
|
12 |
8 |
if not $self->ignore_index_names and $checked_indices{$i_src} |
|
324
|
4 |
8 |
if $i_src->equals($i_tar, $self->case_insensitive, $self->ignore_index_names) |
|
341
|
92 |
130 |
if ($c_tar->equals($c_src, $self->case_insensitive, $self->ignore_constraint_names)) |
|
355
|
76 |
29 |
if not $self->ignore_constraint_names and $checked_constraints{$c_src} |
|
358
|
16 |
90 |
if $c_src->equals($c_tar, $self->case_insensitive, $self->ignore_constraint_names) |
|
375
|
10 |
261 |
if (my $old_name = $tar_table_field->extra->{'renamed_from'}) |
|
377
|
10 |
0 |
if ($src_table_field) { } |
|
389
|
28 |
233 |
unless ($src_table_field) |
|
397
|
52 |
0 |
unless ($tar_table_field->equals($src_table_field, $self->case_insensitive) or $tar_table_field->equals($src_table_field->parsed_field, $self->case_insensitive) or $tar_table_field->parsed_field->equals($src_table_field, $self->case_insensitive) or $tar_table_field->parsed_field->equals($src_table_field->parsed_field, $self->case_insensitive)) |
|
411
|
10 |
249 |
if $renamed_source_fields{$f_src_name} |
|
415
|
16 |
233 |
unless ($tar_table_field) |
|
436
|
9 |
58 |
unless $src_table->_compare_objects(\@src_opts, \@tar_opts) |