File Coverage

blib/lib/SDL/Audio.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::Audio;
2 45     45   21216 use strict;
  45         257  
  45         1291  
3 45     45   233 use warnings;
  45         125  
  45         1384  
4 45     45   235 use vars qw(@ISA @EXPORT @EXPORT_OK);
  45         141  
  45         2892  
5             require Exporter;
6             require DynaLoader;
7 45     45   293 use SDL::Constants ':SDL::Audio';
  45         451  
  45         6543  
8             our @ISA = qw(Exporter DynaLoader);
9              
10 45     45   311 use SDL::Internal::Loader;
  45         108  
  45         3348  
11             internal_load_dlls(__PACKAGE__);
12              
13             our $VERSION = 2.548;
14              
15             bootstrap SDL::Audio;
16              
17 45     45   306 use base 'Exporter';
  45         126  
  45         6237  
18             our @EXPORT = @{ $SDL::Constants::EXPORT_TAGS{'SDL::Audio'} };
19             our %EXPORT_TAGS = (
20             all => \@EXPORT,
21             format => $SDL::Constants::EXPORT_TAGS{'SDL::Audio/format'},
22             status => $SDL::Constants::EXPORT_TAGS{'SDL::Audio/status'}
23             );
24              
25             1;