/lib/SDL/GFX/Primitives.pm
Perl | 24 lines | 19 code | 5 blank | 0 comment | 0 complexity | 9514f90267065dbbbb1efd84a439c514 MD5 | raw file
Possible License(s): AGPL-1.0, GPL-2.0
- package SDL::GFX::Primitives;
- use strict;
- use warnings;
- use vars qw(@ISA @EXPORT @EXPORT_OK);
- require Exporter;
- require DynaLoader;
- use SDL::Constants ':SDL::GFX';
- our @ISA = qw(Exporter DynaLoader);
- use SDL::Internal::Loader;
- internal_load_dlls(__PACKAGE__);
- our $VERSION = 2.548;
- bootstrap SDL::GFX::Primitives;
- use base 'Exporter';
- our @EXPORT = @{ $SDL::Constants::EXPORT_TAGS{'SDL::GFX'} };
- our %EXPORT_TAGS = (
- all => \@EXPORT,
- init => $SDL::Constants::EXPORT_TAGS{'SDL::GFX/init'}
- );
- 1;