File Coverage

blib/lib/Alien/SDL3.pm

Criterion	Covered	Total	%
statement	23	23	100.0
branch	3	4	75.0
condition			n/a
subroutine	8	8	100.0
pod	0	2	0.0
total	34	37	91.8

package Alien::SDL3 0.01 {
    use strict;
    use warnings;
    use File::ShareDir;
    use Path::Tiny;
    use Config;
    #
    sub dynamic_libs {
        my $files = path( File::ShareDir::dist_dir('Alien-SDL3') )->visit(
            sub {
                my ( $path, $state ) = @_;
                $state->{$path}++ if $path =~ m[\.$Config{so}$];
            },
            { recurse => 1 }
        );
    }

    sub features {
        require Alien::SDL3::ConfigData;
        my %features = map { $_ => Alien::SDL3::ConfigData->feature($_) }
            qw[SDL3 SDL3_image SDL3_mixer SDL3_ttf];
        return $features{ $_[1] } if defined $_[1];
        \%features;
    }
}
1;
__END__