File Coverage

blib/lib/SDL/TTF/Font.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package SDL::TTF::Font;
2 4     4   1315 use strict;
  4         5  
  4         127  
3 4     4   14 use warnings;
  4         4  
  4         136  
4 4     4   14 use vars qw(@ISA @EXPORT @EXPORT_OK);
  4         5  
  4         179  
5             require Exporter;
6             require DynaLoader;
7 4     4   14 use SDL::Constants ':SDL::TTF';
  4         4  
  4         417  
8             our @ISA = qw(Exporter DynaLoader);
9              
10 4     4   18 use SDL::Internal::Loader;
  4         6  
  4         180  
11             internal_load_dlls(__PACKAGE__);
12              
13             bootstrap SDL::TTF::Font;
14              
15 4     4   13 use base 'Exporter';
  4         5  
  4         359  
16             our @EXPORT = @{ $SDL::Constants::EXPORT_TAGS{'SDL::TTF'} };
17             our %EXPORT_TAGS = (
18             all => \@EXPORT,
19             hinting => $SDL::Constants::EXPORT_TAGS{'SDL::TTF/hinting'},
20             style => $SDL::Constants::EXPORT_TAGS{'SDL::TTF/style'}
21             );
22              
23             1;