use Test::More;
+if (SDL::Init(SDL_INIT_TIMER) < 0 )
+{
+ plan( skip_all => "Cannot initialize timer!!" );
+
+}
plan ( tests => 4 );
use_ok( 'SDL::Timer' );
my $fired = 0;
-if (SDL::Init(SDL_INIT_TIMER) < 0 )
-{
- plan( skip_all => "Cannot initialize timer!!" );
-
-}
my $timer = new SDL::Timer
sub { $fired++ }, -delay => 30, -times => 1;