[sdlgit/SDL_perl.git] / exp / SDL / Rect / t / 001_load.t

# -*- perl -*-

# t/001_load.t - check module loading and create testing directory

use Test::More tests => 2;

BEGIN { use_ok( 'SDL::Rect' ); }

my $object = new ();
isa_ok ($object, 'SDL::Rect');
Commit	Line	Data
d0eab7ef	1	# -- perl --
	2
	3	# t/001_load.t - check module loading and create testing directory
	4
	5	use Test::More tests => 2;
	6
	7	BEGIN { use_ok( 'SDL::Rect' ); }
	8
	9	my $object = new ();
	10	isa_ok ($object, 'SDL::Rect');
	11
	12