- or download this
/* Static Memory for event filter call back */
static SV * eventfiltersv;
...
SDL_SetEventFilter( (SDL_EventFilter *)eventfilter_cb);
- or download this
#ifndef aTHX_
#define aTHX_
...
OUTPUT:
RETVAL
- or download this
use SDL;
use SDL::Time;
...
my $time = 0;
SDL::Timer::set_timer(100, sub { $time++; return $_[0]} );
print 'this will not print!'