Branch Coverage

blib/lib/SWF/Builder/Character/Shape.pm
Criterion Covered Total %
branch 33 68 48.5


line true false branch
60 0 1 if ($_[0] eq 'none' or $_[0] eq 0) { }
66 0 1 if ($_[0] eq 'Width' or $_[0] eq 'Color') { }
72 0 1 unless defined $width
73 1 0 if (defined $param{'Color'}) { }
78 0 1 if $width == $$self{'_current_line_width'} and $color eq $$self{'_current_line_color'}
80 0 1 if (exists $$self{'_line_style_hash'}{"${width}:$color"}) { }
83 0 1 if (@{$$self{'_line_styles'};} >= 65534)
106 0 1 if ($_[0] eq 'none' or $_[0] eq 0) { }
111 0 1 if ($_[0] eq 'Color' or $_[0] eq 'Gradient' or $_[0] eq 'Bitmap') { }
115 1 0 if (/Gradient/)
119 0 0 if (/Bitmap/)
129 1 0 if (exists $param{'Gradient'}) { }
0 0 elsif (exists $param{'Bitmap'}) { }
130 0 1 unless (UNIVERSAL::isa($param{'Matrix'}, 'SWF::Builder::ExElement::MATRIX'))
133 0 1 lc $param{'Type'} eq 'radial' ? :
139 0 0 unless (UNIVERSAL::isa($param{'Matrix'}, 'SWF::Builder::ExElement::MATRIX'))
141 0 0 if defined $param{'Matrix'}
144 0 0 lc($param{'Type'}) =~ /^clip(ped)?$/ ? :
155 0 1 if $$self{"_current_$setstyle"} eq $fillkey
157 0 1 if (exists $$self{'_fill_style_hash'}{$fillkey}) { }
160 0 1 if (@{$$self{'_fill_styles'};} >= 65534)
200 0 6 if $f
202 6 0 if (defined $$self{'_links'}[-1])
207 0 6 if ($x * $x + $y * $y < $tlx * $tlx + $tly * $tly)
216 1 3 if (exists $param{'MoveDeltaX'} and defined $$self{'_links'}[-1])
225 2 2 if (exists $param{'MoveDeltaX'}) { }
236 1 1 if (exists $$self{'_links'}[-1] and $$self{'_links'}[-1][0] == $linkinfo[0]) { }
241 0 2 if (defined $$self{'_last_anchor'})
243 0 0 if ($$last_anchor[0] == $#{$$self{'_edges'};} or $$last_anchor[0] == $#{$$self{'_edges'};} - 1)
250 1 1 unless defined $r->LineStyle
251 1 1 unless defined $r->FillStyle0
252 2 0 unless defined $r->FillStyle1
254 0 2 if $$self{'_links'}[-1][2][-1] != $#{$$self{'_edges'};}
262 0 1 $$self{'_is_alpha'} ? :