| line |
true |
false |
branch |
|
17
|
111 |
1925 |
if ($defaults)
|
|
28
|
0 |
131 |
if &none(sub {
$type eq $_;
}
, @valid_types)
|
|
41
|
0 |
0 |
if (2 == @_ and 'ARRAY' eq ref $source)
|
|
65
|
0 |
0 |
if (&blessed($source))
|
|
85
|
0 |
0 |
if (defined $nested_name and length $nested_name)
|
|
91
|
0 |
0 |
unless @$fields
|
|
93
|
0 |
0 |
if (@parent_names) { }
|
|
101
|
0 |
0 |
unless @$fields
|
|
103
|
0 |
0 |
unless defined $info->{'data_type'}
|
|
107
|
0 |
0 |
if ($type =~ /(char|text|binary)\z/ and defined $info->{'size'}) { }
|
|
|
0 |
0 |
elsif ($type =~ /int/) { }
|
|
|
0 |
0 |
elsif ($type =~ /enum|set/ and defined $info->{'extra'}{'list'}) { }
|
|
|
0 |
0 |
elsif ($type =~ /bool/) { }
|
|
|
0 |
0 |
elsif ($type =~ /decimal/) { }
|
|
115
|
0 |
0 |
if ($info->{'extra'}{'unsigned'})
|
|
168
|
0 |
0 |
if (defined $size)
|
|
169
|
0 |
0 |
if ('ARRAY' eq ref $size and 2 == @$size) { }
|
|
|
0 |
0 |
elsif ('ARRAY' eq ref $size and 1 == @$size) { }
|
|
|
0 |
0 |
elsif (0 == $size) { }
|
|
|
0 |
0 |
elsif ($size =~ /^[0-9]+\z/) { }
|