Branch Coverage

blib/lib/SWF/BinStream.pm
Criterion Covered Total %
branch 41 72 56.9


line true false branch
27 0 1 if $initialdata ne ''
34 1 0 if (defined $ver)
35 0 1 if $$self{'_lock_version'}
59 0 98 if ($len < $bytes)
60 0 0 if $$self{'_shortsub'}($self, $bytes - $len)
76 35 57 unless $fNoFlush
115 0 0 if $w >= 32768
121 0 0 if $w >= 32768
135 0 0 if $ww >= 2147483648
141 0 0 if $ww >= 2147483648
153 57 24 if ($len < $bits)
164 16 28 if $b >= 2 ** ($bits - 1)
181 0 1 unless require "SWF/BinStream/Codec/$codec.pm"
183 0 1 unless my $m = "SWF::BinStream::Codec::${codec}::Read"->new
187 1 0 if ((my $old_stream = $$self{'_stream'})->length > 0)
221 0 10 if (defined $ver)
222 0 0 if $$self{'_lock_version'}
245 3 34 if $data eq ''
249 0 34 if ($$self{'_flushsize'} > 0 and $$self{'_stream'}->length >= $$self{'_flushsize'})
258 15 0 if (not $size or $size > $self->Length)
262 14 1 if ($size) { }
271 1 14 if defined $$self{'_flushsub'}
281 48 4 if $len <= 0
293 3 13 if length $$self{'_bits'} > 0
300 8 0 if (not defined $key) { }
0 0 elsif (not defined $obj) { }
303 0 0 wantarray ? :
326 39 145 unless $a
364 0 71 unless $nbits
370 53 18 if $s ne ''
376 16 28 if $num < 0
408 8 36 if $max < $i
417 16 28 $r < 0 ? :
428 1 0 if defined $$self{'_flushsub'}
437 0 1 unless require "SWF/BinStream/Codec/$codec.pm"
439 0 1 unless my $m = "SWF::BinStream::Codec::${codec}::Write"->new