| line |
true |
false |
branch |
|
91
|
6 |
7 |
ref $_[0] eq 'HASH' ? : |
|
96
|
0 |
13 |
unless $VALID_FORMATS{$format} |
|
110
|
1 |
29 |
unless (defined $name) |
|
113
|
0 |
1 |
if $used_bits & $mask |
|
127
|
1 |
28 |
if $fieldmask{$name} |
|
128
|
1 |
27 |
if $used_bits & $mask |
|
143
|
1 |
22 |
if not $mask and $unrecognised_ok |
|
144
|
1 |
21 |
unless $mask |
|
147
|
3 |
18 |
if $fieldencoder{$_} |
|
148
|
1 |
20 |
unless defined $v |
|
150
|
6 |
14 |
if (defined(my $shift = $fieldshift{$_})) { } |
|
152
|
1 |
4 |
unless int $v eq $v and $v >= 0 and $v <= $mask >> $shift |
|
157
|
14 |
0 |
if $v |
|
169
|
5 |
14 |
if (defined(my $shift = $fieldshift{$_})) { } |
|
176
|
2 |
17 |
if $fielddecoder{$_} |
|
182
|
5 |
6 |
if ($format ne 'integer') |
|
187
|
2 |
3 |
$big_endian ? : |
|
189
|
1 |
4 |
if ($nbits <= 8) { } |
|
|
0 |
4 |
elsif ($nbits <= 16) { } |
|
|
2 |
2 |
elsif ($nbits <= 24) { } |
|
|
2 |
0 |
elsif ($nbits <= 32) { } |
|
198
|
1 |
1 |
if ($big_endian) { } |
|
319
|
0 |
1 |
unless $value >= 0 and $value < 1 << $width |