Branch Coverage

blib/lib/Data/BitStream/Code/Comma.pm
Criterion Covered Total %
branch 20 32 62.5


line true false branch
21 0 1632 unless $self->writing
23 0 1632 unless $bits >= 1 and $bits <= 16
25 0 1632 if $bits == 1
30 4 4682 unless defined $val and $val >= 0
32 150 4532 if ($val == 0)
47 0 21877 if ($cbits + $bits > 32)
53 4532 0 if $cbits
60 0 1673 if $self->writing
62 0 1673 unless $bits >= 1 and $bits <= 16
64 0 1673 if $bits == 1
69 1631 42 if (not defined $count) { }
42 0 elsif ($count < 0) { }
0 0 elsif ($count == 0) { }
78 44 4725 unless defined $tval
84 0 18050 unless defined $tval
89 42 1628 wantarray ? :