use Test::More tests => 87;
use strict;
+use SDL;
use_ok( 'SDL::Game::Rect' );
centery
/);
-my $rect = SDL::Game::Rect->new();
+
+my $rect = SDL::Game::Rect->new( 0, 0, 0, 0);
isa_ok ($rect, 'SDL::Game::Rect','new went ok');
is ($rect->y(123), 123, 'y is now 123');
is ($rect->top, 123, 'top is an alias to y');
+
+
is ($rect->w(54), 54, 'w is now 54');
is ($rect->width, 54, 'w and width point to the same place');
is ($rect->width(45), 45, 'w is now 45');
is ($rect->w, 45, 'w is an alias to width');
+
is ($rect->h(76), 76, 'h is now 76');
is ($rect->height, 76, 'h and height point to the same place');
is ($rect->height(67), 67, 'h is now 67');