| line |
true |
false |
branch |
|
108
|
0 |
48 |
if ($args->{$deprecated}) |
|
109
|
0 |
0 |
unless $warned_dep++ |
|
117
|
3 |
21 |
if (not $self->output_db) |
|
130
|
0 |
24 |
if $@ |
|
132
|
14 |
10 |
if (my $preprocess = $producer_class->can("preprocess_schema")) |
|
149
|
10 |
68 |
if (my $old_name = $tar_table->extra('renamed_from')) { } |
|
151
|
10 |
0 |
if ($src_table) { } |
|
161
|
12 |
66 |
unless ($src_table) |
|
169
|
0 |
66 |
if $self->case_insensitive |
|
186
|
0 |
81 |
if $self->case_insensitive |
|
189
|
15 |
66 |
unless $src_tables_checked{$src_table_name} |
|
205
|
0 |
21 |
if $@ |
|
222
|
15 |
6 |
if (not $self->no_batch_alters and my $batch_alter = $producer_class->can('batch_alter_table')) { } |
|
250
|
0 |
60 |
unless $flattened_diffs{$_} |
|
|
34 |
26 |
if (@{[] unless $flattened_diffs{$_};}) { } |
|
254
|
50 |
1 |
$_ ? : |
|
|
11 |
41 |
ref $_ eq 'ARRAY' ? : |
|
255
|
3 |
0 |
$self->ignore_missing_methods ? : |
|
|
31 |
3 |
$meth ? : |
|
273
|
10 |
11 |
if (my(@tables) = @{$self->tables_to_create;}) |
|
291
|
8 |
13 |
unless $self->{'tables_to_drop'} |
|
|
13 |
8 |
if (my(@tables_to_drop) = @{[] unless $self->{'tables_to_drop'};}) |
|
294
|
0 |
0 |
$self->ignore_missing_methods ? : |
|
|
13 |
0 |
$meth ? : |
|
300
|
17 |
4 |
if (@diffs) { } |
|
307
|
21 |
0 |
if (@diffs) |
|
308
|
4 |
17 |
unless ($self->output_db =~ /^(?:MySQL|SQLite|PostgreSQL)$/) |
|
313
|
2 |
222 |
$_ =~ /;\s*\z/msx ? : |
|
|
224 |
0 |
$_ ? : |
|
316
|
1 |
20 |
wantarray ? : |
|
329
|
16 |
11 |
if ($i_tar->equals($i_src, $self->case_insensitive, $self->ignore_index_names)) |
|
339
|
12 |
8 |
if not $self->ignore_index_names and $checked_indices{$i_src} |
|
341
|
4 |
8 |
if $i_src->equals($i_tar, $self->case_insensitive, $self->ignore_index_names) |
|
359
|
91 |
130 |
if ($c_tar->equals($c_src, $self->case_insensitive, $self->ignore_constraint_names)) |
|
374
|
75 |
29 |
if not $self->ignore_constraint_names and $checked_constraints{$c_src} |
|
376
|
16 |
90 |
if $c_src->equals($c_tar, $self->case_insensitive, $self->ignore_constraint_names) |
|
393
|
9 |
260 |
if (my $old_name = $tar_table_field->extra->{'renamed_from'}) |
|
395
|
9 |
0 |
if ($src_table_field) { } |
|
407
|
28 |
232 |
unless ($src_table_field) |
|
415
|
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)) |
|
430
|
9 |
248 |
if $renamed_source_fields{$f_src_name} |
|
434
|
16 |
232 |
unless ($tar_table_field) |
|
455
|
9 |
57 |
unless $src_table->_compare_objects(\@src_opts, \@tar_opts) |