Branch Coverage

blib/lib/Tangence/Message.pm
Criterion Covered Total %
branch 41 60 68.3


line true false branch
45 1838 9 if ($num < 31) { }
9 0 elsif ($num < 128) { }
59 0 2087 unless length $_payload
64 2045 42 unless $type == 7
69 20 22 if ($num == 1) { }
20 2 elsif ($num == 2) { }
2 0 elsif ($num == 3) { }
92 9 1828 if ($num == 31)
95 9 0 if ($num < 128) { }
105 1819 18 unless $peek
117 0 1288 unless length $_payload >= $num
156 0 161 unless $struct ||= eval { do { "Tangence::Struct"->for_perlname(ref $rec) } }
159 2 159 unless $_stream->peer_hasstruct->{$struct->perlname}
175 0 161 unless $type == 5
179 161 0 if (not $struct) { }
183 0 0 unless $struct->name eq $got_struct->name
187 0 161 unless $num == $struct->fields
202 19 1 unless $_stream->peer_hasclass->{$class->perlname}
210 11 9 if (@$smashkeys) { }
217 11 0 if ($_stream->_ver_can_typed_smash) { }
233 2 0 if $weakstream
246 20 0 if ($_stream->_ver_can_typed_smash) { }
248 0 20 unless $type == 2
249 0 20 unless $num == @$smashkeys
283 19 9 $b->ret ? :
332 19 9 $b->returns ? :
368 0 1 unless $_stream->peer_hasclass->{$perlname}[3]
371 1 19 @superclasses ? :
380 20 0 if (defined $classid)
408 0 2 unless ($struct->defined)