Branch Coverage

blib/lib/SDLx/Text.pm
Criterion Covered Total %
branch 34 94 36.1


line true false branch
16 0 1 unless ('SDL::Config'->has('SDL_ttf'))
20 0 1 unless ($file)
25 0 1 defined $options{'color'} ? :
32 0 1 defined $options{'shadow_color'} ? :
45 1 0 unless (SDL::TTF::was_init())
46 0 1 unless SDL::TTF::init() == 0
57 0 1 if exists $options{'bold'}
58 0 1 if exists $options{'italic'}
59 0 1 if exists $options{'underline'}
60 0 1 if exists $options{'strikethrough'}
65 0 1 if exists $options{'text'}
73 1 2 if ($font_filename)
76 0 1 unless $$self{'_font'} = SDL::TTF::open_font($font_filename, $size)
93 1 1 if (defined $color)
104 1 2 if ($size)
122 0 0 if (@_ > 2) { }
125 0 0 if ($enable) { }
129 0 0 if $flag & $styles
154 0 1 if ($align)
165 0 1 if ($shadow)
176 1 0 if (defined $shadow_color)
188 1 0 if ($shadow_offset)
198 2 0 unless $surface and ref $surface eq 'ARRAY'
200 0 0 $_ ? :
205 1 0 unless $surface and ref $surface eq 'ARRAY'
207 0 0 $_ ? :
213 0 1 if (defined $x)
222 0 1 if (defined $y)
231 1 2 if scalar @_ == 1
233 1 1 if (defined $text) { }
234 0 1 if $$self{'word_wrap'}
236 0 1 unless my $surface = _get_surfaces_for($font, $text, $$self{'_color'})
239 0 1 if ($$self{'shadow'})
240 0 0 unless my $shadow_surface = _get_surfaces_for($font, $text, $$self{'shadow_color'})
243 0 0 unless ref $shadow_surface eq 'ARRAY'
265 1 0 if index($text, "\n") == -1
294 0 0 if ($w < $maxlen) { }
301 0 0 if substr($paragraph_output[-1], -1, 1) eq ' '
319 0 0 if (@_ > 2)
329 0 0 if (@_ > 4) { }
0 0 elsif ($$self{'_update_surfaces'}) { }
338 0 0 if (my $surfaces = $$self{'surface'})
340 0 0 unless ref $surfaces eq 'ARRAY'
344 0 0 if (my $surface = $$surfaces[$i])
348 0 0 if ($$self{'h_align'} eq 'center') { }
0 0 elsif ($$self{'h_align'} eq 'right') { }
358 0 0 if ($$self{'shadow'})