#!/usr/bin/perl -w
use strict;
use SDL;
use SDL::Event;
use SDL::Events;
use SDL::Surface;
use SDL::Video;
use Devel::Peek;
use Test::More;
use lib 't/lib';
use SDL::TestTool;
my $videodriver = $ENV{SDL_VIDEODRIVER};
$ENV{SDL_VIDEODRIVER} = 'dummy' unless $ENV{SDL_RELEASE_TESTING};
if ( !SDL::TestTool->init(SDL_INIT_VIDEO) ) {
plan( skip_all => 'Failed to init video' );
}
my @done = qw/
pump_events
peep_events
push_event
poll_event
wait_event
set_event_filter
event_state
get_key_state
get_key_name
get_mod_state
set_mod_state
enable_unicode
enable_key_repeat
get_mouse_state
get_relative_mouse_state
get_app_state
joystick_event_state
/;
my @done_event = qw/
type
active
key
motion
button
jaxis
jball
jhat
jbutton
resize
expose
quit
user
syswm
/;
can_ok( 'SDL::Events', @done );
can_ok( 'SDL::Event', @done_event );
is( SDL_ACTIVEEVENT, 1, 'SDL_ACTIVEEVENT should be imported' );
is( SDL_ACTIVEEVENT(), 1, 'SDL_ACTIVEEVENT() should also be available' );
is( SDL_ACTIVEEVENTMASK,
SDL_EVENTMASK(SDL_ACTIVEEVENT),
'SDL_ACTIVEVENTMASK should be imported'
);
is( SDL_ACTIVEEVENTMASK(),
SDL_EVENTMASK(SDL_ACTIVEEVENT),
'SDL_ACTIVEVENTMASK() should also be available'
);
is( SDL_ADDEVENT, 0, 'SDL_ADDEVENT should be imported' );
is( SDL_ADDEVENT(), 0, 'SDL_ADDEVENT() should also be available' );
is( SDL_ALLEVENTS, 0xFFFFFFFF, 'SDL_ALLEVENTS should be imported' );
is( SDL_ALLEVENTS(), 0xFFFFFFFF, 'SDL_ALLEVENTS() should also be available' );
is( SDL_APPACTIVE, 4, 'SDL_APPACTIVE should be imported' );
is( SDL_APPACTIVE(), 4, 'SDL_APPACTIVE() should also be available' );
is( SDL_APPINPUTFOCUS, 2, 'SDL_APPINPUTFOCUS should be imported' );
is( SDL_APPINPUTFOCUS(), 2, 'SDL_APPINPUTFOCUS() should also be available' );
is( SDL_APPMOUSEFOCUS, 1, 'SDL_APPMOUSEFOCUS should be imported' );
is( SDL_APPMOUSEFOCUS(), 1, 'SDL_APPMOUSEFOCUS() should also be available' );
is( SDL_BUTTON_LEFT, 1, 'SDL_BUTTON_LEFT should be imported' );
is( SDL_BUTTON_LEFT(), 1, 'SDL_BUTTON_LEFT() should also be available' );
is( SDL_BUTTON_MIDDLE, 2, 'SDL_BUTTON_MIDDLE should be imported' );
is( SDL_BUTTON_MIDDLE(), 2, 'SDL_BUTTON_MIDDLE() should also be available' );
is( SDL_BUTTON_RIGHT, 3, 'SDL_BUTTON_RIGHT should be imported' );
is( SDL_BUTTON_RIGHT(), 3, 'SDL_BUTTON_RIGHT() should also be available' );
is( SDL_BUTTON_WHEELUP, 4, 'SDL_BUTTON_WHEELUP should be imported' );
is( SDL_BUTTON_WHEELUP(), 4, 'SDL_BUTTON_WHEELUP() should also be available' );
is( SDL_BUTTON_WHEELDOWN, 5, 'SDL_BUTTON_WHEELDOWN should be imported' );
is( SDL_BUTTON_WHEELDOWN(), 5,
'SDL_BUTTON_WHEELDOWN() should also be available'
);
is( SDL_DISABLE, 0, 'SDL_DISABLE should be imported' );
is( SDL_DISABLE(), 0, 'SDL_DISABLE() should also be available' );
is( SDL_ENABLE, 1, 'SDL_ENABLE should be imported' );
is( SDL_ENABLE(), 1, 'SDL_ENABLE() should also be available' );
is( SDL_GETEVENT, 2, 'SDL_GETEVENT should be imported' );
is( SDL_GETEVENT(), 2, 'SDL_GETEVENT() should also be available' );
is( SDL_HAT_CENTERED, 0, 'SDL_HAT_CENTERED should be imported' );
is( SDL_HAT_CENTERED(), 0, 'SDL_HAT_CENTERED() should also be available' );
is( SDL_HAT_DOWN, 4, 'SDL_HAT_DOWN should be imported' );
is( SDL_HAT_DOWN(), 4, 'SDL_HAT_DOWN() should also be available' );
is( SDL_HAT_LEFT, 8, 'SDL_HAT_LEFT should be imported' );
is( SDL_HAT_LEFT(), 8, 'SDL_HAT_LEFT() should also be available' );
is( SDL_HAT_LEFTDOWN, 12, 'SDL_HAT_LEFTDOWN should be imported' );
is( SDL_HAT_LEFTDOWN(), 12, 'SDL_HAT_LEFTDOWN() should also be available' );
is( SDL_HAT_LEFTUP, 9, 'SDL_HAT_LEFTUP should be imported' );
is( SDL_HAT_LEFTUP(), 9, 'SDL_HAT_LEFTUP() should also be available' );
is( SDL_HAT_RIGHT, 2, 'SDL_HAT_RIGHT should be imported' );
is( SDL_HAT_RIGHT(), 2, 'SDL_HAT_RIGHT() should also be available' );
is( SDL_HAT_RIGHTDOWN, 6, 'SDL_HAT_RIGHTDOWN should be imported' );
is( SDL_HAT_RIGHTDOWN(), 6, 'SDL_HAT_RIGHTDOWN() should also be available' );
is( SDL_HAT_RIGHTUP, 3, 'SDL_HAT_RIGHTUP should be imported' );
is( SDL_HAT_RIGHTUP(), 3, 'SDL_HAT_RIGHTUP() should also be available' );
is( SDL_HAT_UP, 1, 'SDL_HAT_UP should be imported' );
is( SDL_HAT_UP(), 1, 'SDL_HAT_UP() should also be available' );
is( SDL_IGNORE, 0, 'SDL_IGNORE should be imported' );
is( SDL_IGNORE(), 0, 'SDL_IGNORE() should also be available' );
is( SDL_JOYAXISMOTION, 7, 'SDL_JOYAXISMOTION should be imported' );
is( SDL_JOYAXISMOTION(), 7, 'SDL_JOYAXISMOTION() should also be available' );
is( SDL_JOYBALLMOTION, 8, 'SDL_JOYBALLMOTION should be imported' );
is( SDL_JOYBALLMOTION(), 8, 'SDL_JOYBALLMOTION() should also be available' );
is( SDL_JOYBUTTONDOWN, 10, 'SDL_JOYBUTTONDOWN should be imported' );
is( SDL_JOYBUTTONDOWN(), 10, 'SDL_JOYBUTTONDOWN() should also be available' );
is( SDL_JOYBUTTONUP, 11, 'SDL_JOYBUTTONUP should be imported' );
is( SDL_JOYBUTTONUP(), 11, 'SDL_JOYBUTTONUP() should also be available' );
is( SDL_JOYHATMOTION, 9, 'SDL_JOYHATMOTION should be imported' );
is( SDL_JOYHATMOTION(), 9, 'SDL_JOYHATMOTION() should also be available' );
is( SDL_JOYAXISMOTIONMASK,
SDL_EVENTMASK(SDL_JOYAXISMOTION),
'SDL_JOYAXISMOTIONMASK should be imported'
);
is( SDL_JOYAXISMOTIONMASK(),
SDL_EVENTMASK(SDL_JOYAXISMOTION),
'SDL_JOYAXISMOTIONMASK() should also be available'
);
is( SDL_JOYBALLMOTIONMASK,
SDL_EVENTMASK(SDL_JOYBALLMOTION),
'SDL_JOYBALLMOTIONMASK should be imported'
);
is( SDL_JOYBALLMOTIONMASK(),
SDL_EVENTMASK(SDL_JOYBALLMOTION),
'SDL_JOYBALLMOTIONMASK() should also be available'
);
is( SDL_JOYHATMOTIONMASK,
SDL_EVENTMASK(SDL_JOYHATMOTION),
'SDL_JOYHATMOTIONMASK should be imported'
);
is( SDL_JOYHATMOTIONMASK(),
SDL_EVENTMASK(SDL_JOYHATMOTION),
'SDL_JOYHATMOTIONMASK() should also be available'
);
is( SDL_JOYBUTTONDOWNMASK,
SDL_EVENTMASK(SDL_JOYBUTTONDOWN),
'SDL_JOYBUTTONDOWNMASK should be imported'
);
is( SDL_JOYBUTTONDOWNMASK(),
SDL_EVENTMASK(SDL_JOYBUTTONDOWN),
'SDL_JOYBUTTONDOWNMASK() should also be available'
);
is( SDL_JOYBUTTONUPMASK,
SDL_EVENTMASK(SDL_JOYBUTTONUP),
'SDL_JOYBUTTONUPMASK should be imported'
);
is( SDL_JOYBUTTONUPMASK(),
SDL_EVENTMASK(SDL_JOYBUTTONUP),
'SDL_JOYBUTTONUPMASK() should also be available'
);
is( SDL_JOYEVENTMASK,
SDL_EVENTMASK(SDL_JOYAXISMOTION) | SDL_EVENTMASK(SDL_JOYBALLMOTION) |
SDL_EVENTMASK(SDL_JOYHATMOTION) | SDL_EVENTMASK(SDL_JOYBUTTONDOWN) |
SDL_EVENTMASK(SDL_JOYBUTTONUP),
'SDL_JOYEVENTMASK should be imported'
);
is( SDL_JOYEVENTMASK(),
SDL_EVENTMASK(SDL_JOYAXISMOTION) | SDL_EVENTMASK(SDL_JOYBALLMOTION) |
SDL_EVENTMASK(SDL_JOYHATMOTION) | SDL_EVENTMASK(SDL_JOYBUTTONDOWN) |
SDL_EVENTMASK(SDL_JOYBUTTONUP),
'SDL_JOYEVENTMASK() should also be available'
);
is( SDL_KEYDOWN, 2, 'SDL_KEYDOWN should be imported' );
is( SDL_KEYDOWN(), 2, 'SDL_KEYDOWN() should also be available' );
is( SDL_KEYUP, 3, 'SDL_KEYUP should be imported' );
is( SDL_KEYUP(), 3, 'SDL_KEYUP() should also be available' );
is( SDL_KEYDOWNMASK,
SDL_EVENTMASK(SDL_KEYDOWN),
'SDL_KEYDOWNMASK should be imported'
);
is( SDL_KEYDOWNMASK(),
SDL_EVENTMASK(SDL_KEYDOWN),
'SDL_KEYDOWNMASK() should also be available'
);
is( SDL_KEYUPMASK,
SDL_EVENTMASK(SDL_KEYUP),
'SDL_KEYUPMASK should be imported'
);
is( SDL_KEYUPMASK(),
SDL_EVENTMASK(SDL_KEYUP),
'SDL_KEYUPMASK() should also be available'
);
is( SDL_KEYEVENTMASK,
SDL_EVENTMASK(SDL_KEYDOWN) | SDL_EVENTMASK(SDL_KEYUP),
'SDL_KEYEVENTMASK should be imported'
);
is( SDL_KEYEVENTMASK(),
SDL_EVENTMASK(SDL_KEYDOWN) | SDL_EVENTMASK(SDL_KEYUP),
'SDL_KEYEVENTMASK() should also be available'
);
is( SDL_MOUSEBUTTONDOWN, 5, 'SDL_MOUSEBUTTONDOWN should be imported' );
is( SDL_MOUSEBUTTONDOWN(), 5,
'SDL_MOUSEBUTTONDOWN() should also be available'
);
is( SDL_MOUSEBUTTONUP, 6, 'SDL_MOUSEBUTTONUP should be imported' );
is( SDL_MOUSEBUTTONUP(), 6, 'SDL_MOUSEBUTTONUP() should also be available' );
is( SDL_MOUSEMOTION, 4, 'SDL_MOUSEMOTION should be imported' );
is( SDL_MOUSEMOTION(), 4, 'SDL_MOUSEMOTION() should also be available' );
is( SDL_MOUSEMOTIONMASK,
SDL_EVENTMASK(SDL_MOUSEMOTION),
'SDL_MOUSEMOTIONMASK should be imported'
);
is( SDL_MOUSEMOTIONMASK(),
SDL_EVENTMASK(SDL_MOUSEMOTION),
'SDL_MOUSEMOTIONMASK() should also be available'
);
is( SDL_MOUSEBUTTONDOWNMASK,
SDL_EVENTMASK(SDL_MOUSEBUTTONDOWN),
'SDL_MOUSEBUTTONDOWNMASK should be imported'
);
is( SDL_MOUSEBUTTONDOWNMASK(),
SDL_EVENTMASK(SDL_MOUSEBUTTONDOWN),
'SDL_MOUSEBUTTONDOWNMASK() should also be available'
);
is( SDL_MOUSEBUTTONUPMASK,
SDL_EVENTMASK(SDL_MOUSEBUTTONUP),
'SDL_MOUSEBUTTONUPMASK should be imported'
);
is( SDL_MOUSEBUTTONUPMASK(),
SDL_EVENTMASK(SDL_MOUSEBUTTONUP),
'SDL_MOUSEBUTTONUPMASK() should also be available'
);
is( SDL_MOUSEEVENTMASK,
SDL_EVENTMASK(SDL_MOUSEMOTION) | SDL_EVENTMASK(SDL_MOUSEBUTTONDOWN) |
SDL_EVENTMASK(SDL_MOUSEBUTTONUP),
'SDL_MOUSEEVENTMASK should be imported'
);
is( SDL_MOUSEEVENTMASK(),
SDL_EVENTMASK(SDL_MOUSEMOTION) | SDL_EVENTMASK(SDL_MOUSEBUTTONDOWN) |
SDL_EVENTMASK(SDL_MOUSEBUTTONUP),
'SDL_MOUSEEVENTMASK() should also be available'
);
is( SDL_NUMEVENTS, 32, 'SDL_NUMEVENTS should be imported' );
is( SDL_NUMEVENTS(), 32, 'SDL_NUMEVENTS() should also be available' );
is( SDL_PEEKEVENT, 1, 'SDL_PEEKEVENT should be imported' );
is( SDL_PEEKEVENT(), 1, 'SDL_PEEKEVENT() should also be available' );
is( SDL_PRESSED, 1, 'SDL_PRESSED should be imported' );
is( SDL_PRESSED(), 1, 'SDL_PRESSED() should also be available' );
is( SDL_QUERY, -1, 'SDL_QUERY should be imported' );
is( SDL_QUERY(), -1, 'SDL_QUERY() should also be available' );
is( SDL_QUIT, 12, 'SDL_QUIT should be imported' );
is( SDL_QUIT(), 12, 'SDL_QUIT() should also be available' );
is( SDL_QUITMASK, SDL_EVENTMASK(SDL_QUIT), 'SDL_QUITMASK should be imported' );
is( SDL_QUITMASK(), SDL_EVENTMASK(SDL_QUIT),
'SDL_QUITMASK() should also be available'
);
is( SDL_RELEASED, 0, 'SDL_RELEASED should be imported' );
is( SDL_RELEASED(), 0, 'SDL_RELEASED() should also be available' );
is( SDL_SYSWMEVENT, 13, 'SDL_SYSWMEVENT should be imported' );
is( SDL_SYSWMEVENT(), 13, 'SDL_SYSWMEVENT() should also be available' );
is( SDL_SYSWMEVENTMASK,
SDL_EVENTMASK(SDL_SYSWMEVENT),
'SDL_SYSWMEVENTMASK should be imported'
);
is( SDL_SYSWMEVENTMASK(),
SDL_EVENTMASK(SDL_SYSWMEVENT),
'SDL_SYSWMEVENTMASK() should also be available'
);
is( SDL_USEREVENT, 24, 'SDL_USEREVENT should be imported' );
is( SDL_USEREVENT(), 24, 'SDL_USEREVENT() should also be available' );
is( SDL_VIDEOEXPOSE, 17, 'SDL_VIDEOEXPOSE should be imported' );
is( SDL_VIDEOEXPOSE(), 17, 'SDL_VIDEOEXPOSE() should also be available' );
is( SDL_VIDEOEXPOSEMASK,
SDL_EVENTMASK(SDL_VIDEOEXPOSE),
'SDL_VIDEOEXPOSEMASK should be imported'
);
is( SDL_VIDEOEXPOSEMASK(),
SDL_EVENTMASK(SDL_VIDEOEXPOSE),
'SDL_VIDEOEXPOSEMASK() should also be available'
);
is( SDL_VIDEORESIZE, 16, 'SDL_VIDEORESIZE should be imported' );
is( SDL_VIDEORESIZE(), 16, 'SDL_VIDEORESIZE() should also be available' );
is( SDL_VIDEORESIZEMASK,
SDL_EVENTMASK(SDL_VIDEORESIZE),
'SDL_VIDEORESIZEMASK should be imported'
);
is( SDL_VIDEORESIZEMASK(),
SDL_EVENTMASK(SDL_VIDEORESIZE),
'SDL_VIDEORESIZEMASK() should also be available'
);
is( KMOD_ALT, 768, 'KMOD_ALT should be imported' );
is( KMOD_ALT(), 768, 'KMOD_ALT() should also be available' );
is( KMOD_CAPS, 8192, 'KMOD_CAPS should be imported' );
is( KMOD_CAPS(), 8192, 'KMOD_CAPS() should also be available' );
is( KMOD_CTRL, 192, 'KMOD_CTRL should be imported' );
is( KMOD_CTRL(), 192, 'KMOD_CTRL() should also be available' );
is( KMOD_LALT, 256, 'KMOD_LALT should be imported' );
is( KMOD_LALT(), 256, 'KMOD_LALT() should also be available' );
is( KMOD_LCTRL, 64, 'KMOD_LCTRL should be imported' );
is( KMOD_LCTRL(), 64, 'KMOD_LCTRL() should also be available' );
is( KMOD_LMETA, 0x0400, 'KMOD_LMETA should be imported' );
is( KMOD_LMETA(), 0x0400, 'KMOD_LMETA() should also be available' );
is( KMOD_LSHIFT, 1, 'KMOD_LSHIFT should be imported' );
is( KMOD_LSHIFT(), 1, 'KMOD_LSHIFT() should also be available' );
is( KMOD_META, 0x0400 | 0x0800, 'KMOD_META should be imported' );
is( KMOD_META(), 0x0400 | 0x0800, 'KMOD_META() should also be available' );
is( KMOD_MODE, 0x4000, 'KMOD_MODE should be imported' );
is( KMOD_MODE(), 0x4000, 'KMOD_MODE() should also be available' );
is( KMOD_NONE, 0, 'KMOD_NONE should be imported' );
is( KMOD_NONE(), 0, 'KMOD_NONE() should also be available' );
is( KMOD_NUM, 4096, 'KMOD_NUM should be imported' );
is( KMOD_NUM(), 4096, 'KMOD_NUM() should also be available' );
is( KMOD_RESERVED, 0x8000, 'KMOD_RESERVED should be imported' );
is( KMOD_RESERVED(), 0x8000, 'KMOD_RESERVED() should also be available' );
is( KMOD_RALT, 512, 'KMOD_RALT should be imported' );
is( KMOD_RALT(), 512, 'KMOD_RALT() should also be available' );
is( KMOD_RCTRL, 128, 'KMOD_RCTRL should be imported' );
is( KMOD_RCTRL(), 128, 'KMOD_RCTRL() should also be available' );
is( KMOD_RMETA, 0x0800, 'KMOD_RMETA should be imported' );
is( KMOD_RMETA(), 0x0800, 'KMOD_RMETA() should also be available' );
is( KMOD_RSHIFT, 2, 'KMOD_RSHIFT should be imported' );
is( KMOD_RSHIFT(), 2, 'KMOD_RSHIFT() should also be available' );
is( KMOD_SHIFT, 3, 'KMOD_SHIFT should be imported' );
is( KMOD_SHIFT(), 3, 'KMOD_SHIFT() should also be available' );
is( SDLK_0, 48, 'SDLK_0 should be imported' );
is( SDLK_0(), 48, 'SDLK_0() should also be available' );
is( SDLK_1, 49, 'SDLK_1 should be imported' );
is( SDLK_1(), 49, 'SDLK_1() should also be available' );
is( SDLK_2, 50, 'SDLK_2 should be imported' );
is( SDLK_2(), 50, 'SDLK_2() should also be available' );
is( SDLK_3, 51, 'SDLK_3 should be imported' );
is( SDLK_3(), 51, 'SDLK_3() should also be available' );
is( SDLK_4, 52, 'SDLK_4 should be imported' );
is( SDLK_4(), 52, 'SDLK_4() should also be available' );
is( SDLK_5, 53, 'SDLK_5 should be imported' );
is( SDLK_5(), 53, 'SDLK_5() should also be available' );
is( SDLK_6, 54, 'SDLK_6 should be imported' );
is( SDLK_6(), 54, 'SDLK_6() should also be available' );
is( SDLK_7, 55, 'SDLK_7 should be imported' );
is( SDLK_7(), 55, 'SDLK_7() should also be available' );
is( SDLK_8, 56, 'SDLK_8 should be imported' );
is( SDLK_8(), 56, 'SDLK_8() should also be available' );
is( SDLK_9, 57, 'SDLK_9 should be imported' );
is( SDLK_9(), 57, 'SDLK_9() should also be available' );
is( SDLK_AMPERSAND, 38, 'SDLK_AMPERSAND should be imported' );
is( SDLK_AMPERSAND(), 38, 'SDLK_AMPERSAND() should also be available' );
is( SDLK_ASTERISK, 42, 'SDLK_ASTERISK should be imported' );
is( SDLK_ASTERISK(), 42, 'SDLK_ASTERISK() should also be available' );
is( SDLK_AT, 64, 'SDLK_AT should be imported' );
is( SDLK_AT(), 64, 'SDLK_AT() should also be available' );
is( SDLK_BACKQUOTE, 96, 'SDLK_BACKQUOTE should be imported' );
is( SDLK_BACKQUOTE(), 96, 'SDLK_BACKQUOTE() should also be available' );
is( SDLK_BACKSLASH, 92, 'SDLK_BACKSLASH should be imported' );
is( SDLK_BACKSLASH(), 92, 'SDLK_BACKSLASH() should also be available' );
is( SDLK_BACKSPACE, 8, 'SDLK_BACKSPACE should be imported' );
is( SDLK_BACKSPACE(), 8, 'SDLK_BACKSPACE() should also be available' );
is( SDLK_BREAK, 318, 'SDLK_BREAK should be imported' );
is( SDLK_BREAK(), 318, 'SDLK_BREAK() should also be available' );
is( SDLK_CAPSLOCK, 301, 'SDLK_CAPSLOCK should be imported' );
is( SDLK_CAPSLOCK(), 301, 'SDLK_CAPSLOCK() should also be available' );
is( SDLK_CARET, 94, 'SDLK_CARET should be imported' );
is( SDLK_CARET(), 94, 'SDLK_CARET() should also be available' );
is( SDLK_CLEAR, 12, 'SDLK_CLEAR should be imported' );
is( SDLK_CLEAR(), 12, 'SDLK_CLEAR() should also be available' );
is( SDLK_COLON, 58, 'SDLK_COLON should be imported' );
is( SDLK_COLON(), 58, 'SDLK_COLON() should also be available' );
is( SDLK_COMMA, 44, 'SDLK_COMMA should be imported' );
is( SDLK_COMMA(), 44, 'SDLK_COMMA() should also be available' );
is( SDLK_COMPOSE, 314, 'SDLK_COMPOSE should be imported' );
is( SDLK_COMPOSE(), 314, 'SDLK_COMPOSE() should also be available' );
is( SDLK_DELETE, 127, 'SDLK_DELETE should be imported' );
is( SDLK_DELETE(), 127, 'SDLK_DELETE() should also be available' );
is( SDLK_DOLLAR, 36, 'SDLK_DOLLAR should be imported' );
is( SDLK_DOLLAR(), 36, 'SDLK_DOLLAR() should also be available' );
is( SDLK_DOWN, 274, 'SDLK_DOWN should be imported' );
is( SDLK_DOWN(), 274, 'SDLK_DOWN() should also be available' );
is( SDLK_END, 279, 'SDLK_END should be imported' );
is( SDLK_END(), 279, 'SDLK_END() should also be available' );
is( SDLK_EQUALS, 61, 'SDLK_EQUALS should be imported' );
is( SDLK_EQUALS(), 61, 'SDLK_EQUALS() should also be available' );
is( SDLK_ESCAPE, 27, 'SDLK_ESCAPE should be imported' );
is( SDLK_ESCAPE(), 27, 'SDLK_ESCAPE() should also be available' );
is( SDLK_EURO, 321, 'SDLK_EURO should be imported' );
is( SDLK_EURO(), 321, 'SDLK_EURO() should also be available' );
is( SDLK_EXCLAIM, 33, 'SDLK_EXCLAIM should be imported' );
is( SDLK_EXCLAIM(), 33, 'SDLK_EXCLAIM() should also be available' );
is( SDLK_F1, 282, 'SDLK_F1 should be imported' );
is( SDLK_F1(), 282, 'SDLK_F1() should also be available' );
is( SDLK_F10, 291, 'SDLK_F10 should be imported' );
is( SDLK_F10(), 291, 'SDLK_F10() should also be available' );
is( SDLK_F11, 292, 'SDLK_F11 should be imported' );
is( SDLK_F11(), 292, 'SDLK_F11() should also be available' );
is( SDLK_F12, 293, 'SDLK_F12 should be imported' );
is( SDLK_F12(), 293, 'SDLK_F12() should also be available' );
is( SDLK_F13, 294, 'SDLK_F13 should be imported' );
is( SDLK_F13(), 294, 'SDLK_F13() should also be available' );
is( SDLK_F14, 295, 'SDLK_F14 should be imported' );
is( SDLK_F14(), 295, 'SDLK_F14() should also be available' );
is( SDLK_F15, 296, 'SDLK_F15 should be imported' );
is( SDLK_F15(), 296, 'SDLK_F15() should also be available' );
is( SDLK_F2, 283, 'SDLK_F2 should be imported' );
is( SDLK_F2(), 283, 'SDLK_F2() should also be available' );
is( SDLK_F3, 284, 'SDLK_F3 should be imported' );
is( SDLK_F3(), 284, 'SDLK_F3() should also be available' );
is( SDLK_F4, 285, 'SDLK_F4 should be imported' );
is( SDLK_F4(), 285, 'SDLK_F4() should also be available' );
is( SDLK_F5, 286, 'SDLK_F5 should be imported' );
is( SDLK_F5(), 286, 'SDLK_F5() should also be available' );
is( SDLK_F6, 287, 'SDLK_F6 should be imported' );
is( SDLK_F6(), 287, 'SDLK_F6() should also be available' );
is( SDLK_F7, 288, 'SDLK_F7 should be imported' );
is( SDLK_F7(), 288, 'SDLK_F7() should also be available' );
is( SDLK_F8, 289, 'SDLK_F8 should be imported' );
is( SDLK_F8(), 289, 'SDLK_F8() should also be available' );
is( SDLK_F9, 290, 'SDLK_F9 should be imported' );
is( SDLK_F9(), 290, 'SDLK_F9() should also be available' );
is( SDLK_FIRST, 0, 'SDLK_FIRST should be imported' );
is( SDLK_FIRST(), 0, 'SDLK_FIRST() should also be available' );
is( SDLK_GREATER, 62, 'SDLK_GREATER should be imported' );
is( SDLK_GREATER(), 62, 'SDLK_GREATER() should also be available' );
is( SDLK_HASH, 35, 'SDLK_HASH should be imported' );
is( SDLK_HASH(), 35, 'SDLK_HASH() should also be available' );
is( SDLK_HELP, 315, 'SDLK_HELP should be imported' );
is( SDLK_HELP(), 315, 'SDLK_HELP() should also be available' );
is( SDLK_HOME, 278, 'SDLK_HOME should be imported' );
is( SDLK_HOME(), 278, 'SDLK_HOME() should also be available' );
is( SDLK_INSERT, 277, 'SDLK_INSERT should be imported' );
is( SDLK_INSERT(), 277, 'SDLK_INSERT() should also be available' );
is( SDLK_KP0, 256, 'SDLK_KP0 should be imported' );
is( SDLK_KP0(), 256, 'SDLK_KP0() should also be available' );
is( SDLK_KP1, 257, 'SDLK_KP1 should be imported' );
is( SDLK_KP1(), 257, 'SDLK_KP1() should also be available' );
is( SDLK_KP2, 258, 'SDLK_KP2 should be imported' );
is( SDLK_KP2(), 258, 'SDLK_KP2() should also be available' );
is( SDLK_KP3, 259, 'SDLK_KP3 should be imported' );
is( SDLK_KP3(), 259, 'SDLK_KP3() should also be available' );
is( SDLK_KP4, 260, 'SDLK_KP4 should be imported' );
is( SDLK_KP4(), 260, 'SDLK_KP4() should also be available' );
is( SDLK_KP5, 261, 'SDLK_KP5 should be imported' );
is( SDLK_KP5(), 261, 'SDLK_KP5() should also be available' );
is( SDLK_KP6, 262, 'SDLK_KP6 should be imported' );
is( SDLK_KP6(), 262, 'SDLK_KP6() should also be available' );
is( SDLK_KP7, 263, 'SDLK_KP7 should be imported' );
is( SDLK_KP7(), 263, 'SDLK_KP7() should also be available' );
is( SDLK_KP8, 264, 'SDLK_KP8 should be imported' );
is( SDLK_KP8(), 264, 'SDLK_KP8() should also be available' );
is( SDLK_KP9, 265, 'SDLK_KP9 should be imported' );
is( SDLK_KP9(), 265, 'SDLK_KP9() should also be available' );
is( SDLK_KP_DIVIDE, 267, 'SDLK_KP_DIVIDE should be imported' );
is( SDLK_KP_DIVIDE(), 267, 'SDLK_KP_DIVIDE() should also be available' );
is( SDLK_KP_ENTER, 271, 'SDLK_KP_ENTER should be imported' );
is( SDLK_KP_ENTER(), 271, 'SDLK_KP_ENTER() should also be available' );
is( SDLK_KP_EQUALS, 272, 'SDLK_KP_EQUALS should be imported' );
is( SDLK_KP_EQUALS(), 272, 'SDLK_KP_EQUALS() should also be available' );
is( SDLK_KP_MINUS, 269, 'SDLK_KP_MINUS should be imported' );
is( SDLK_KP_MINUS(), 269, 'SDLK_KP_MINUS() should also be available' );
is( SDLK_KP_MULTIPLY, 268, 'SDLK_KP_MULTIPLY should be imported' );
is( SDLK_KP_MULTIPLY(), 268, 'SDLK_KP_MULTIPLY() should also be available' );
is( SDLK_KP_PERIOD, 266, 'SDLK_KP_PERIOD should be imported' );
is( SDLK_KP_PERIOD(), 266, 'SDLK_KP_PERIOD() should also be available' );
is( SDLK_KP_PLUS, 270, 'SDLK_KP_PLUS should be imported' );
is( SDLK_KP_PLUS(), 270, 'SDLK_KP_PLUS() should also be available' );
is( SDLK_LALT, 308, 'SDLK_LALT should be imported' );
is( SDLK_LALT(), 308, 'SDLK_LALT() should also be available' );
is( SDLK_LCTRL, 306, 'SDLK_LCTRL should be imported' );
is( SDLK_LCTRL(), 306, 'SDLK_LCTRL() should also be available' );
is( SDLK_LEFT, 276, 'SDLK_LEFT should be imported' );
is( SDLK_LEFT(), 276, 'SDLK_LEFT() should also be available' );
is( SDLK_LEFTBRACKET, 91, 'SDLK_LEFTBRACKET should be imported' );
is( SDLK_LEFTBRACKET(), 91, 'SDLK_LEFTBRACKET() should also be available' );
is( SDLK_LEFTPAREN, 40, 'SDLK_LEFTPAREN should be imported' );
is( SDLK_LEFTPAREN(), 40, 'SDLK_LEFTPAREN() should also be available' );
is( SDLK_LESS, 60, 'SDLK_LESS should be imported' );
is( SDLK_LESS(), 60, 'SDLK_LESS() should also be available' );
is( SDLK_LMETA, 310, 'SDLK_LMETA should be imported' );
is( SDLK_LMETA(), 310, 'SDLK_LMETA() should also be available' );
is( SDLK_LSHIFT, 304, 'SDLK_LSHIFT should be imported' );
is( SDLK_LSHIFT(), 304, 'SDLK_LSHIFT() should also be available' );
is( SDLK_LSUPER, 311, 'SDLK_LSUPER should be imported' );
is( SDLK_LSUPER(), 311, 'SDLK_LSUPER() should also be available' );
is( SDLK_MENU, 319, 'SDLK_MENU should be imported' );
is( SDLK_MENU(), 319, 'SDLK_MENU() should also be available' );
is( SDLK_MINUS, 45, 'SDLK_MINUS should be imported' );
is( SDLK_MINUS(), 45, 'SDLK_MINUS() should also be available' );
is( SDLK_MODE, 313, 'SDLK_MODE should be imported' );
is( SDLK_MODE(), 313, 'SDLK_MODE() should also be available' );
is( SDLK_NUMLOCK, 300, 'SDLK_NUMLOCK should be imported' );
is( SDLK_NUMLOCK(), 300, 'SDLK_NUMLOCK() should also be available' );
is( SDLK_PAGEDOWN, 281, 'SDLK_PAGEDOWN should be imported' );
is( SDLK_PAGEDOWN(), 281, 'SDLK_PAGEDOWN() should also be available' );
is( SDLK_PAGEUP, 280, 'SDLK_PAGEUP should be imported' );
is( SDLK_PAGEUP(), 280, 'SDLK_PAGEUP() should also be available' );
is( SDLK_PAUSE, 19, 'SDLK_PAUSE should be imported' );
is( SDLK_PAUSE(), 19, 'SDLK_PAUSE() should also be available' );
is( SDLK_PERIOD, 46, 'SDLK_PERIOD should be imported' );
is( SDLK_PERIOD(), 46, 'SDLK_PERIOD() should also be available' );
is( SDLK_PLUS, 43, 'SDLK_PLUS should be imported' );
is( SDLK_PLUS(), 43, 'SDLK_PLUS() should also be available' );
is( SDLK_POWER, 320, 'SDLK_POWER should be imported' );
is( SDLK_POWER(), 320, 'SDLK_POWER() should also be available' );
is( SDLK_PRINT, 316, 'SDLK_PRINT should be imported' );
is( SDLK_PRINT(), 316, 'SDLK_PRINT() should also be available' );
is( SDLK_QUESTION, 63, 'SDLK_QUESTION should be imported' );
is( SDLK_QUESTION(), 63, 'SDLK_QUESTION() should also be available' );
is( SDLK_QUOTE, 39, 'SDLK_QUOTE should be imported' );
is( SDLK_QUOTE(), 39, 'SDLK_QUOTE() should also be available' );
is( SDLK_QUOTEDBL, 34, 'SDLK_QUOTEDBL should be imported' );
is( SDLK_QUOTEDBL(), 34, 'SDLK_QUOTEDBL() should also be available' );
is( SDLK_RALT, 307, 'SDLK_RALT should be imported' );
is( SDLK_RALT(), 307, 'SDLK_RALT() should also be available' );
is( SDLK_RCTRL, 305, 'SDLK_RCTRL should be imported' );
is( SDLK_RCTRL(), 305, 'SDLK_RCTRL() should also be available' );
is( SDLK_RETURN, 13, 'SDLK_RETURN should be imported' );
is( SDLK_RETURN(), 13, 'SDLK_RETURN() should also be available' );
is( SDLK_RIGHT, 275, 'SDLK_RIGHT should be imported' );
is( SDLK_RIGHT(), 275, 'SDLK_RIGHT() should also be available' );
is( SDLK_RIGHTBRACKET, 93, 'SDLK_RIGHTBRACKET should be imported' );
is( SDLK_RIGHTBRACKET(), 93, 'SDLK_RIGHTBRACKET() should also be available' );
is( SDLK_RIGHTPAREN, 41, 'SDLK_RIGHTPAREN should be imported' );
is( SDLK_RIGHTPAREN(), 41, 'SDLK_RIGHTPAREN() should also be available' );
is( SDLK_RMETA, 309, 'SDLK_RMETA should be imported' );
is( SDLK_RMETA(), 309, 'SDLK_RMETA() should also be available' );
is( SDLK_RSHIFT, 303, 'SDLK_RSHIFT should be imported' );
is( SDLK_RSHIFT(), 303, 'SDLK_RSHIFT() should also be available' );
is( SDLK_RSUPER, 312, 'SDLK_RSUPER should be imported' );
is( SDLK_RSUPER(), 312, 'SDLK_RSUPER() should also be available' );
is( SDLK_SCROLLOCK, 302, 'SDLK_SCROLLOCK should be imported' );
is( SDLK_SCROLLOCK(), 302, 'SDLK_SCROLLOCK() should also be available' );
is( SDLK_SEMICOLON, 59, 'SDLK_SEMICOLON should be imported' );
is( SDLK_SEMICOLON(), 59, 'SDLK_SEMICOLON() should also be available' );
is( SDLK_SLASH, 47, 'SDLK_SLASH should be imported' );
is( SDLK_SLASH(), 47, 'SDLK_SLASH() should also be available' );
is( SDLK_SPACE, 32, 'SDLK_SPACE should be imported' );
is( SDLK_SPACE(), 32, 'SDLK_SPACE() should also be available' );
is( SDLK_SYSREQ, 317, 'SDLK_SYSREQ should be imported' );
is( SDLK_SYSREQ(), 317, 'SDLK_SYSREQ() should also be available' );
is( SDLK_TAB, 9, 'SDLK_TAB should be imported' );
is( SDLK_TAB(), 9, 'SDLK_TAB() should also be available' );
is( SDLK_UNDERSCORE, 95, 'SDLK_UNDERSCORE should be imported' );
is( SDLK_UNDERSCORE(), 95, 'SDLK_UNDERSCORE() should also be available' );
is( SDLK_UNDO, 322, 'SDLK_UNDO should be imported' );
is( SDLK_UNDO(), 322, 'SDLK_UNDO() should also be available' );
is( SDLK_UNKNOWN, 0, 'SDLK_WORLD_95 should be imported' );
is( SDLK_UNKNOWN(), 0, 'SDLK_WORLD_95() should also be available' );
is( SDLK_UP, 273, 'SDLK_UP should be imported' );
is( SDLK_UP(), 273, 'SDLK_UP() should also be available' );
is( SDLK_WORLD_0, 160, 'SDLK_WORLD_0 should be imported' );
is( SDLK_WORLD_0(), 160, 'SDLK_WORLD_0() should also be available' );
is( SDLK_WORLD_1, 161, 'SDLK_WORLD_1 should be imported' );
is( SDLK_WORLD_1(), 161, 'SDLK_WORLD_1() should also be available' );
is( SDLK_WORLD_2, 162, 'SDLK_WORLD_2 should be imported' );
is( SDLK_WORLD_2(), 162, 'SDLK_WORLD_2() should also be available' );
is( SDLK_WORLD_3, 163, 'SDLK_WORLD_3 should be imported' );
is( SDLK_WORLD_3(), 163, 'SDLK_WORLD_3() should also be available' );
is( SDLK_WORLD_4, 164, 'SDLK_WORLD_4 should be imported' );
is( SDLK_WORLD_4(), 164, 'SDLK_WORLD_4() should also be available' );
is( SDLK_WORLD_5, 165, 'SDLK_WORLD_5 should be imported' );
is( SDLK_WORLD_5(), 165, 'SDLK_WORLD_5() should also be available' );
is( SDLK_WORLD_6, 166, 'SDLK_WORLD_6 should be imported' );
is( SDLK_WORLD_6(), 166, 'SDLK_WORLD_6() should also be available' );
is( SDLK_WORLD_7, 167, 'SDLK_WORLD_7 should be imported' );
is( SDLK_WORLD_7(), 167, 'SDLK_WORLD_7() should also be available' );
is( SDLK_WORLD_8, 168, 'SDLK_WORLD_8 should be imported' );
is( SDLK_WORLD_8(), 168, 'SDLK_WORLD_8() should also be available' );
is( SDLK_WORLD_9, 169, 'SDLK_WORLD_9 should be imported' );
is( SDLK_WORLD_9(), 169, 'SDLK_WORLD_9() should also be available' );
is( SDLK_WORLD_10, 170, 'SDLK_WORLD_10 should be imported' );
is( SDLK_WORLD_10(), 170, 'SDLK_WORLD_10() should also be available' );
is( SDLK_WORLD_11, 171, 'SDLK_WORLD_11 should be imported' );
is( SDLK_WORLD_11(), 171, 'SDLK_WORLD_11() should also be available' );
is( SDLK_WORLD_12, 172, 'SDLK_WORLD_12 should be imported' );
is( SDLK_WORLD_12(), 172, 'SDLK_WORLD_12() should also be available' );
is( SDLK_WORLD_13, 173, 'SDLK_WORLD_13 should be imported' );
is( SDLK_WORLD_13(), 173, 'SDLK_WORLD_13() should also be available' );
is( SDLK_WORLD_14, 174, 'SDLK_WORLD_14 should be imported' );
is( SDLK_WORLD_14(), 174, 'SDLK_WORLD_14() should also be available' );
is( SDLK_WORLD_15, 175, 'SDLK_WORLD_15 should be imported' );
is( SDLK_WORLD_15(), 175, 'SDLK_WORLD_15() should also be available' );
is( SDLK_WORLD_16, 176, 'SDLK_WORLD_16 should be imported' );
is( SDLK_WORLD_16(), 176, 'SDLK_WORLD_16() should also be available' );
is( SDLK_WORLD_17, 177, 'SDLK_WORLD_17 should be imported' );
is( SDLK_WORLD_17(), 177, 'SDLK_WORLD_17() should also be available' );
is( SDLK_WORLD_18, 178, 'SDLK_WORLD_18 should be imported' );
is( SDLK_WORLD_18(), 178, 'SDLK_WORLD_18() should also be available' );
is( SDLK_WORLD_19, 179, 'SDLK_WORLD_19 should be imported' );
is( SDLK_WORLD_19(), 179, 'SDLK_WORLD_19() should also be available' );
is( SDLK_WORLD_20, 180, 'SDLK_WORLD_20 should be imported' );
is( SDLK_WORLD_20(), 180, 'SDLK_WORLD_20() should also be available' );
is( SDLK_WORLD_21, 181, 'SDLK_WORLD_21 should be imported' );
is( SDLK_WORLD_21(), 181, 'SDLK_WORLD_21() should also be available' );
is( SDLK_WORLD_22, 182, 'SDLK_WORLD_22 should be imported' );
is( SDLK_WORLD_22(), 182, 'SDLK_WORLD_22() should also be available' );
is( SDLK_WORLD_23, 183, 'SDLK_WORLD_23 should be imported' );
is( SDLK_WORLD_23(), 183, 'SDLK_WORLD_23() should also be available' );
is( SDLK_WORLD_24, 184, 'SDLK_WORLD_24 should be imported' );
is( SDLK_WORLD_24(), 184, 'SDLK_WORLD_24() should also be available' );
is( SDLK_WORLD_25, 185, 'SDLK_WORLD_25 should be imported' );
is( SDLK_WORLD_25(), 185, 'SDLK_WORLD_25() should also be available' );
is( SDLK_WORLD_26, 186, 'SDLK_WORLD_26 should be imported' );
is( SDLK_WORLD_26(), 186, 'SDLK_WORLD_26() should also be available' );
is( SDLK_WORLD_27, 187, 'SDLK_WORLD_27 should be imported' );
is( SDLK_WORLD_27(), 187, 'SDLK_WORLD_27() should also be available' );
is( SDLK_WORLD_28, 188, 'SDLK_WORLD_28 should be imported' );
is( SDLK_WORLD_28(), 188, 'SDLK_WORLD_28() should also be available' );
is( SDLK_WORLD_29, 189, 'SDLK_WORLD_29 should be imported' );
is( SDLK_WORLD_29(), 189, 'SDLK_WORLD_29() should also be available' );
is( SDLK_WORLD_30, 190, 'SDLK_WORLD_30 should be imported' );
is( SDLK_WORLD_30(), 190, 'SDLK_WORLD_30() should also be available' );
is( SDLK_WORLD_31, 191, 'SDLK_WORLD_31 should be imported' );
is( SDLK_WORLD_31(), 191, 'SDLK_WORLD_31() should also be available' );
is( SDLK_WORLD_32, 192, 'SDLK_WORLD_32 should be imported' );
is( SDLK_WORLD_32(), 192, 'SDLK_WORLD_32() should also be available' );
is( SDLK_WORLD_33, 193, 'SDLK_WORLD_33 should be imported' );
is( SDLK_WORLD_33(), 193, 'SDLK_WORLD_33() should also be available' );
is( SDLK_WORLD_34, 194, 'SDLK_WORLD_34 should be imported' );
is( SDLK_WORLD_34(), 194, 'SDLK_WORLD_34() should also be available' );
is( SDLK_WORLD_35, 195, 'SDLK_WORLD_35 should be imported' );
is( SDLK_WORLD_35(), 195, 'SDLK_WORLD_35() should also be available' );
is( SDLK_WORLD_36, 196, 'SDLK_WORLD_36 should be imported' );
is( SDLK_WORLD_36(), 196, 'SDLK_WORLD_36() should also be available' );
is( SDLK_WORLD_37, 197, 'SDLK_WORLD_37 should be imported' );
is( SDLK_WORLD_37(), 197, 'SDLK_WORLD_37() should also be available' );
is( SDLK_WORLD_38, 198, 'SDLK_WORLD_38 should be imported' );
is( SDLK_WORLD_38(), 198, 'SDLK_WORLD_38() should also be available' );
is( SDLK_WORLD_39, 199, 'SDLK_WORLD_39 should be imported' );
is( SDLK_WORLD_39(), 199, 'SDLK_WORLD_39() should also be available' );
is( SDLK_WORLD_40, 200, 'SDLK_WORLD_40 should be imported' );
is( SDLK_WORLD_40(), 200, 'SDLK_WORLD_40() should also be available' );
is( SDLK_WORLD_41, 201, 'SDLK_WORLD_41 should be imported' );
is( SDLK_WORLD_41(), 201, 'SDLK_WORLD_41() should also be available' );
is( SDLK_WORLD_42, 202, 'SDLK_WORLD_42 should be imported' );
is( SDLK_WORLD_42(), 202, 'SDLK_WORLD_42() should also be available' );
is( SDLK_WORLD_43, 203, 'SDLK_WORLD_43 should be imported' );
is( SDLK_WORLD_43(), 203, 'SDLK_WORLD_43() should also be available' );
is( SDLK_WORLD_44, 204, 'SDLK_WORLD_44 should be imported' );
is( SDLK_WORLD_44(), 204, 'SDLK_WORLD_44() should also be available' );
is( SDLK_WORLD_45, 205, 'SDLK_WORLD_45 should be imported' );
is( SDLK_WORLD_45(), 205, 'SDLK_WORLD_45() should also be available' );
is( SDLK_WORLD_46, 206, 'SDLK_WORLD_46 should be imported' );
is( SDLK_WORLD_46(), 206, 'SDLK_WORLD_46() should also be available' );
is( SDLK_WORLD_47, 207, 'SDLK_WORLD_47 should be imported' );
is( SDLK_WORLD_47(), 207, 'SDLK_WORLD_47() should also be available' );
is( SDLK_WORLD_48, 208, 'SDLK_WORLD_48 should be imported' );
is( SDLK_WORLD_48(), 208, 'SDLK_WORLD_48() should also be available' );
is( SDLK_WORLD_49, 209, 'SDLK_WORLD_49 should be imported' );
is( SDLK_WORLD_49(), 209, 'SDLK_WORLD_49() should also be available' );
is( SDLK_WORLD_50, 210, 'SDLK_WORLD_50 should be imported' );
is( SDLK_WORLD_50(), 210, 'SDLK_WORLD_50() should also be available' );
is( SDLK_WORLD_51, 211, 'SDLK_WORLD_51 should be imported' );
is( SDLK_WORLD_51(), 211, 'SDLK_WORLD_51() should also be available' );
is( SDLK_WORLD_52, 212, 'SDLK_WORLD_52 should be imported' );
is( SDLK_WORLD_52(), 212, 'SDLK_WORLD_52() should also be available' );
is( SDLK_WORLD_53, 213, 'SDLK_WORLD_53 should be imported' );
is( SDLK_WORLD_53(), 213, 'SDLK_WORLD_53() should also be available' );
is( SDLK_WORLD_54, 214, 'SDLK_WORLD_54 should be imported' );
is( SDLK_WORLD_54(), 214, 'SDLK_WORLD_54() should also be available' );
is( SDLK_WORLD_55, 215, 'SDLK_WORLD_55 should be imported' );
is( SDLK_WORLD_55(), 215, 'SDLK_WORLD_55() should also be available' );
is( SDLK_WORLD_56, 216, 'SDLK_WORLD_56 should be imported' );
is( SDLK_WORLD_56(), 216, 'SDLK_WORLD_56() should also be available' );
is( SDLK_WORLD_57, 217, 'SDLK_WORLD_57 should be imported' );
is( SDLK_WORLD_57(), 217, 'SDLK_WORLD_57() should also be available' );
is( SDLK_WORLD_58, 218, 'SDLK_WORLD_58 should be imported' );
is( SDLK_WORLD_58(), 218, 'SDLK_WORLD_58() should also be available' );
is( SDLK_WORLD_59, 219, 'SDLK_WORLD_59 should be imported' );
is( SDLK_WORLD_59(), 219, 'SDLK_WORLD_59() should also be available' );
is( SDLK_WORLD_60, 220, 'SDLK_WORLD_60 should be imported' );
is( SDLK_WORLD_60(), 220, 'SDLK_WORLD_60() should also be available' );
is( SDLK_WORLD_61, 221, 'SDLK_WORLD_61 should be imported' );
is( SDLK_WORLD_61(), 221, 'SDLK_WORLD_61() should also be available' );
is( SDLK_WORLD_62, 222, 'SDLK_WORLD_62 should be imported' );
is( SDLK_WORLD_62(), 222, 'SDLK_WORLD_62() should also be available' );
is( SDLK_WORLD_63, 223, 'SDLK_WORLD_63 should be imported' );
is( SDLK_WORLD_63(), 223, 'SDLK_WORLD_63() should also be available' );
is( SDLK_WORLD_64, 224, 'SDLK_WORLD_64 should be imported' );
is( SDLK_WORLD_64(), 224, 'SDLK_WORLD_64() should also be available' );
is( SDLK_WORLD_65, 225, 'SDLK_WORLD_65 should be imported' );
is( SDLK_WORLD_65(), 225, 'SDLK_WORLD_65() should also be available' );
is( SDLK_WORLD_66, 226, 'SDLK_WORLD_66 should be imported' );
is( SDLK_WORLD_66(), 226, 'SDLK_WORLD_66() should also be available' );
is( SDLK_WORLD_67, 227, 'SDLK_WORLD_67 should be imported' );
is( SDLK_WORLD_67(), 227, 'SDLK_WORLD_67() should also be available' );
is( SDLK_WORLD_68, 228, 'SDLK_WORLD_68 should be imported' );
is( SDLK_WORLD_68(), 228, 'SDLK_WORLD_68() should also be available' );
is( SDLK_WORLD_69, 229, 'SDLK_WORLD_69 should be imported' );
is( SDLK_WORLD_69(), 229, 'SDLK_WORLD_69() should also be available' );
is( SDLK_WORLD_70, 230, 'SDLK_WORLD_70 should be imported' );
is( SDLK_WORLD_70(), 230, 'SDLK_WORLD_70() should also be available' );
is( SDLK_WORLD_71, 231, 'SDLK_WORLD_71 should be imported' );
is( SDLK_WORLD_71(), 231, 'SDLK_WORLD_71() should also be available' );
is( SDLK_WORLD_72, 232, 'SDLK_WORLD_72 should be imported' );
is( SDLK_WORLD_72(), 232, 'SDLK_WORLD_72() should also be available' );
is( SDLK_WORLD_73, 233, 'SDLK_WORLD_73 should be imported' );
is( SDLK_WORLD_73(), 233, 'SDLK_WORLD_73() should also be available' );
is( SDLK_WORLD_74, 234, 'SDLK_WORLD_74 should be imported' );
is( SDLK_WORLD_74(), 234, 'SDLK_WORLD_74() should also be available' );
is( SDLK_WORLD_75, 235, 'SDLK_WORLD_75 should be imported' );
is( SDLK_WORLD_75(), 235, 'SDLK_WORLD_75() should also be available' );
is( SDLK_WORLD_76, 236, 'SDLK_WORLD_76 should be imported' );
is( SDLK_WORLD_76(), 236, 'SDLK_WORLD_76() should also be available' );
is( SDLK_WORLD_77, 237, 'SDLK_WORLD_77 should be imported' );
is( SDLK_WORLD_77(), 237, 'SDLK_WORLD_77() should also be available' );
is( SDLK_WORLD_78, 238, 'SDLK_WORLD_78 should be imported' );
is( SDLK_WORLD_78(), 238, 'SDLK_WORLD_78() should also be available' );
is( SDLK_WORLD_79, 239, 'SDLK_WORLD_79 should be imported' );
is( SDLK_WORLD_79(), 239, 'SDLK_WORLD_79() should also be available' );
is( SDLK_WORLD_80, 240, 'SDLK_WORLD_80 should be imported' );
is( SDLK_WORLD_80(), 240, 'SDLK_WORLD_80() should also be available' );
is( SDLK_WORLD_81, 241, 'SDLK_WORLD_81 should be imported' );
is( SDLK_WORLD_81(), 241, 'SDLK_WORLD_81() should also be available' );
is( SDLK_WORLD_82, 242, 'SDLK_WORLD_82 should be imported' );
is( SDLK_WORLD_82(), 242, 'SDLK_WORLD_82() should also be available' );
is( SDLK_WORLD_83, 243, 'SDLK_WORLD_83 should be imported' );
is( SDLK_WORLD_83(), 243, 'SDLK_WORLD_83() should also be available' );
is( SDLK_WORLD_84, 244, 'SDLK_WORLD_84 should be imported' );
is( SDLK_WORLD_84(), 244, 'SDLK_WORLD_84() should also be available' );
is( SDLK_WORLD_85, 245, 'SDLK_WORLD_85 should be imported' );
is( SDLK_WORLD_85(), 245, 'SDLK_WORLD_85() should also be available' );
is( SDLK_WORLD_86, 246, 'SDLK_WORLD_86 should be imported' );
is( SDLK_WORLD_86(), 246, 'SDLK_WORLD_86() should also be available' );
is( SDLK_WORLD_87, 247, 'SDLK_WORLD_87 should be imported' );
is( SDLK_WORLD_87(), 247, 'SDLK_WORLD_87() should also be available' );
is( SDLK_WORLD_88, 248, 'SDLK_WORLD_88 should be imported' );
is( SDLK_WORLD_88(), 248, 'SDLK_WORLD_88() should also be available' );
is( SDLK_WORLD_89, 249, 'SDLK_WORLD_89 should be imported' );
is( SDLK_WORLD_89(), 249, 'SDLK_WORLD_89() should also be available' );
is( SDLK_WORLD_90, 250, 'SDLK_WORLD_90 should be imported' );
is( SDLK_WORLD_90(), 250, 'SDLK_WORLD_90() should also be available' );
is( SDLK_WORLD_91, 251, 'SDLK_WORLD_91 should be imported' );
is( SDLK_WORLD_91(), 251, 'SDLK_WORLD_91() should also be available' );
is( SDLK_WORLD_92, 252, 'SDLK_WORLD_92 should be imported' );
is( SDLK_WORLD_92(), 252, 'SDLK_WORLD_92() should also be available' );
is( SDLK_WORLD_93, 253, 'SDLK_WORLD_93 should be imported' );
is( SDLK_WORLD_93(), 253, 'SDLK_WORLD_93() should also be available' );
is( SDLK_WORLD_94, 254, 'SDLK_WORLD_94 should be imported' );
is( SDLK_WORLD_94(), 254, 'SDLK_WORLD_94() should also be available' );
is( SDLK_WORLD_95, 255, 'SDLK_WORLD_95 should be imported' );
is( SDLK_WORLD_95(), 255, 'SDLK_WORLD_95() should also be available' );
is( SDLK_a, 97, 'SDLK_a should be imported' );
is( SDLK_a(), 97, 'SDLK_a() should also be available' );
is( SDLK_b, 98, 'SDLK_b should be imported' );
is( SDLK_b(), 98, 'SDLK_b() should also be available' );
is( SDLK_c, 99, 'SDLK_c should be imported' );
is( SDLK_c(), 99, 'SDLK_c() should also be available' );
is( SDLK_d, 100, 'SDLK_d should be imported' );
is( SDLK_d(), 100, 'SDLK_d() should also be available' );
is( SDLK_e, 101, 'SDLK_e should be imported' );
is( SDLK_e(), 101, 'SDLK_e() should also be available' );
is( SDLK_f, 102, 'SDLK_f should be imported' );
is( SDLK_f(), 102, 'SDLK_f() should also be available' );
is( SDLK_g, 103, 'SDLK_g should be imported' );
is( SDLK_g(), 103, 'SDLK_g() should also be available' );
is( SDLK_h, 104, 'SDLK_h should be imported' );
is( SDLK_h(), 104, 'SDLK_h() should also be available' );
is( SDLK_i, 105, 'SDLK_i should be imported' );
is( SDLK_i(), 105, 'SDLK_i() should also be available' );
is( SDLK_j, 106, 'SDLK_j should be imported' );
is( SDLK_j(), 106, 'SDLK_j() should also be available' );
is( SDLK_k, 107, 'SDLK_k should be imported' );
is( SDLK_k(), 107, 'SDLK_k() should also be available' );
is( SDLK_l, 108, 'SDLK_l should be imported' );
is( SDLK_l(), 108, 'SDLK_l() should also be available' );
is( SDLK_m, 109, 'SDLK_m should be imported' );
is( SDLK_m(), 109, 'SDLK_m() should also be available' );
is( SDLK_n, 110, 'SDLK_n should be imported' );
is( SDLK_n(), 110, 'SDLK_n() should also be available' );
is( SDLK_o, 111, 'SDLK_o should be imported' );
is( SDLK_o(), 111, 'SDLK_o() should also be available' );
is( SDLK_p, 112, 'SDLK_p should be imported' );
is( SDLK_p(), 112, 'SDLK_p() should also be available' );
is( SDLK_q, 113, 'SDLK_q should be imported' );
is( SDLK_q(), 113, 'SDLK_q() should also be available' );
is( SDLK_r, 114, 'SDLK_r should be imported' );
is( SDLK_r(), 114, 'SDLK_r() should also be available' );
is( SDLK_s, 115, 'SDLK_s should be imported' );
is( SDLK_s(), 115, 'SDLK_s() should also be available' );
is( SDLK_t, 116, 'SDLK_t should be imported' );
is( SDLK_t(), 116, 'SDLK_t() should also be available' );
is( SDLK_u, 117, 'SDLK_u should be imported' );
is( SDLK_u(), 117, 'SDLK_u() should also be available' );
is( SDLK_v, 118, 'SDLK_v should be imported' );
is( SDLK_v(), 118, 'SDLK_v() should also be available' );
is( SDLK_w, 119, 'SDLK_w should be imported' );
is( SDLK_w(), 119, 'SDLK_w() should also be available' );
is( SDLK_x, 120, 'SDLK_x should be imported' );
is( SDLK_x(), 120, 'SDLK_x() should also be available' );
is( SDLK_y, 121, 'SDLK_y should be imported' );
is( SDLK_y(), 121, 'SDLK_y() should also be available' );
is( SDLK_z, 122, 'SDLK_z should be imported' );
is( SDLK_z(), 122, 'SDLK_z() should also be available' );
my $display = SDL::Video::set_video_mode( 640, 480, 32, SDL_SWSURFACE );
is( SDL::Events::pump_events(), undef, '[pump_events] Returns undef' );
my $event = SDL::Event->new();
my $aevent = SDL::Event->new();
$aevent->type(SDL_ACTIVEEVENT);
$aevent->active_gain(1);
$aevent->active_state(SDL_APPINPUTFOCUS);
my $userdata = SDL::Event->new();
$userdata->type(SDL_USEREVENT);
my @udata = ( 0 .. 10 );
$userdata->user_data1( \@udata );
SDL::Events::push_event($aevent);
pass '[push_event] Event can be pushed';
SDL::Events::push_event($userdata);
SDL::Events::pump_events();
pass '[pump_events] pumping events';
my $got_event = 0;
while (1) {
SDL::Events::pump_events();
my $ret = SDL::Events::poll_event($event);
my $r;
if ( $event->type == SDL_ACTIVEEVENT
&& $event->active_gain == 1
&& $event->active_state == SDL_APPINPUTFOCUS )
{
$got_event = 1;
is( $got_event, 1, '[poll_event] Got an Active event back out' );
is( $event->active_gain(), 1, '[poll_event] Got right active->gain' );
is( $event->active_state(), SDL_APPINPUTFOCUS,
'[poll_event] Got right active->state'
);
}
if ( $event->type == SDL_USEREVENT ) {
$r = $event->user_data1();
is( @{$r}, 11, '[user_events] can hold user data now' );
}
last if $r && $got_event;
last if ( $ret == 0 );
}
SDL::Events::push_event($aevent);
pass '[push_event] ran';
SDL::Events::pump_events();
my $value = SDL::Events::wait_event($event);
is( $value, 1, '[wait_event] waited for event' );
my $num_peep_events = SDL::Events::peep_events( $event, 127, SDL_PEEKEVENT, SDL_ALLEVENTS );
is( $num_peep_events >= 0,
1, '[peep_events] Size of event queue is ' . $num_peep_events
);
my $callback = sub { return 1; };
SDL::Events::set_event_filter($callback);
pass '[set_event_filter] takes a callback';
my $array = SDL::Events::get_key_state();
isa_ok( $array, 'ARRAY', '[get_key_state] returned and array' );
my @mods = (
KMOD_NONE, KMOD_LSHIFT, KMOD_RSHIFT, KMOD_LCTRL,
KMOD_RCTRL, KMOD_LALT, KMOD_RALT, KMOD_LMETA,
KMOD_RMETA, KMOD_NUM, KMOD_CAPS, KMOD_MODE,
);
foreach (@mods) {
SDL::Events::set_mod_state($_);
pass '[set_mod_state] set the mod properly';
is( SDL::Events::get_mod_state(),
$_, '[get_mod_state] got the mod properly'
);
}
#SDL::quit();
#SDL::init(SDL_INIT_VIDEO);
$display = SDL::Video::set_video_mode( 640, 480, 32, SDL_SWSURFACE );
SDL::Video::get_video_info();
is( SDL::Events::get_key_name(SDLK_ESCAPE),
'escape', '[get_key_name] Gets name of key_sym back'
);
SDL::Events::push_event($aevent);
my $nevent = SDL::Event->new();
SDL::Events::event_state( SDL_ACTIVEEVENT, SDL_IGNORE );
SDL::Events::pump_events();
my $got = 0;
while ( SDL::Events::poll_event($nevent) ) {
$got = 1 if $nevent->type == SDL_ACTIVEEVENT;
}
is( $got, 0, '[event_state] works with SDL_IGNORE on SDL_ACTIVEEVENT' );
SDL::Events::event_state( SDL_ACTIVEEVENT, SDL_ENABLE );
SDL::Events::push_event($aevent);
SDL::Events::pump_events();
my $atleast = 0;
while ( SDL::Events::poll_event($nevent) ) {
$atleast = 1 if $nevent->type == SDL_ACTIVEEVENT;
}
is( $atleast, 1, '[event_state] works with SDL_ENABLE on SDL_ACTIVEEVENT' );
is( SDL::Events::enable_unicode(1), 0, '[enable_unicode] return 0 took 1' );
is( SDL::Events::enable_unicode(-1), 1, '[enable_unicode] return 1 took -1' );
is( SDL::Events::enable_unicode(0), 1, '[enable_unicode] return 1 took 0' );
is( SDL::Events::enable_unicode(-1), 0, '[enable_unicode] return 1 took -1' );
#my $kr = SDL::Events::enable_key_repeat( SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
my $kr = SDL::Events::enable_key_repeat( 10, 10 );
is( ( $kr == -1 || $kr == 0 ),
1, '[enable_key_repeat] returned expeceted values'
);
SDL::Events::pump_events();
my $ms = SDL::Events::get_mouse_state();
isa_ok(
$ms, 'ARRAY',
'[get_mouse_state] got back array size of ' . @{$ms} . ' '
);
$ms = SDL::Events::get_relative_mouse_state();
isa_ok(
$ms, 'ARRAY',
'[get_relative_mouse_state] got back array size of ' . @{$ms} . ' '
);
$ms = SDL::Events::get_app_state();
is( ( $ms >= SDL_APPACTIVE || SDL_APPINPUTFOCUS && $ms <= SDL_APPMOUSEFOCUS ),
1, '[get_app_state] Returns value within parameter ' . $ms
);
is( SDL::Events::joystick_event_state(SDL_ENABLE),
SDL_ENABLE, '[joystick_event_state] return SDL_IGNORE correctly'
);
is( SDL::Events::joystick_event_state(SDL_QUERY),
SDL_ENABLE, '[joystick_event_state] return SDL_ENABLE took SDL_QUERY'
);
is( SDL::Events::joystick_event_state(SDL_IGNORE),
SDL_IGNORE, '[joystick_event_state] return SDL_IGNORE correctly'
);
is( SDL::Events::joystick_event_state(SDL_QUERY),
SDL_IGNORE, '[joystick_event_state] return SDL_IGNORE took SDL_QUERY '
);
SKIP:
{
skip "Turn SDL_GUI_TEST on", 1 unless $ENV{'SDL_GUI_TEST'};
SDL::quit();
SDL::init(SDL_INIT_VIDEO);
$display = SDL::Video::set_video_mode( 640, 480, 32, SDL_SWSURFACE );
$event = SDL::Event->new();
#This filters out all ActiveEvents
my $filter = sub {
if ( $_[0]->type == SDL_ACTIVEEVENT ) { return 0 }
else { return 1; }
};
my $filtered = 1;
SDL::Events::set_event_filter($filter);
while (1) {
SDL::Events::pump_events();
if ( SDL::Events::poll_event($event) ) {
if ( $event->type == SDL_ACTIVEEVENT ) {
diag 'We should not be in here. The next test will fail!';
$filtered = 0; #we got a problem!
print "Hello Mouse!!!\n"
if ( $event->active_gain
&& ( $event->active_state == SDL_APPMOUSEFOCUS ) );
print "Bye Mouse!!!\n"
if ( !$event->active_gain
&& ( $event->active_state == SDL_APPMOUSEFOCUS ) );
}
last if ( $event->type == SDL_QUIT );
}
}
is( $filtered, 1, '[set_event_filter] Properly filtered SDL_ACTIVEEVENT' );
}
if ($videodriver) {
$ENV{SDL_VIDEODRIVER} = $videodriver;
} else {
delete $ENV{SDL_VIDEODRIVER};
}
#SDL::quit();
pass 'Are we still alive? Checking for segfaults';
done_testing;
sleep(2);