Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

45 lines (37 sloc) 0.504 kB
#!perl
# basic testing of SDL::SMPEG
BEGIN {
unshift @INC, 'blib/lib', 'blib/arch';
}
use strict;
use SDL::Config;
use Test::More;
if ( SDL::Config->has('smpeg') ) {
plan( tests => 2 );
} else {
plan( skip_all => ( SDL::Config->has('smpeg') ? '' : ' smpeg support not compiled' ) );
}
use_ok('SDL::SMPEG');
can_ok(
'SDL::SMPEG', qw/
new
error
audio
video
volume
display
scale
play
pause
stop
rewind
seek
skip
loop
region
frame
info
status
/
);
sleep(2);
Jump to Line
Something went wrong with that request. Please try again.