exp/SDL/Rect/t/001_load.t

   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 = SDL::Rect->NewRect(0,0,0,0);
  10 isa_ok ($object, 'SDL::Rect');
  11
  12