File Coverage

blib/lib/SDL/Event.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

package SDL::Event;
use strict;
use warnings;
use vars qw(@ISA @EXPORT @EXPORT_OK);
require Exporter;
require DynaLoader;
use SDL::Constants ':SDL::Events';
our @ISA = qw(Exporter DynaLoader);

use SDL::Internal::Loader;
internal_load_dlls(__PACKAGE__);

bootstrap SDL::Event;

use base 'Exporter';
our @EXPORT      = @{ $SDL::Constants::EXPORT_TAGS{'SDL::Events'} };
our %EXPORT_TAGS = (
	all    => \@EXPORT,
	type   => $SDL::Constants::EXPORT_TAGS{'SDL::Events/type'},
	mask   => $SDL::Constants::EXPORT_TAGS{'SDL::Events/mask'},
	action => $SDL::Constants::EXPORT_TAGS{'SDL::Events/action'},
	state  => $SDL::Constants::EXPORT_TAGS{'SDL::Events/state'},
	hat    => $SDL::Constants::EXPORT_TAGS{'SDL::Events/hat'},
	app    => $SDL::Constants::EXPORT_TAGS{'SDL::Events/app'},
	button => $SDL::Constants::EXPORT_TAGS{'SDL::Events/button'},
	keysym => $SDL::Constants::EXPORT_TAGS{'SDL::Events/keysym'},
	keymod => $SDL::Constants::EXPORT_TAGS{'SDL::Events/keymod'}
);

1;