3 # Copyright (C) 2003 Tels
4 # Copyright (C) 2004 David J. Goehrig
6 # basic testing of SDL::Surface
9 unshift @INC, 'blib/lib','blib/arch';
18 use_ok( 'SDL::Surface' );
20 can_ok ('SDL::Surface', qw/
58 my $surface = SDL::Surface->new();
60 isa_ok($surface,'SDL::Surface');