From: Kartik Thakore <thakore.kartik@gmail.com>
Date: Fri, 23 Oct 2009 19:27:04 +0000 (-0400)
Subject: Test to contain XS macro hacks in SDL::Video::get_video_driver_name
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bc1947c72c2249911b536ba4ba64f8ad642d6e99;p=sdlgit%2FSDL_perl.git

Test to contain XS macro hacks in SDL::Video::get_video_driver_name
---

diff --git a/t/core_video.t b/t/core_video.t
index a0e45c2..ed2e4d5 100644
--- a/t/core_video.t
+++ b/t/core_video.t
@@ -5,7 +5,7 @@ use SDL::Config;
 
 use Test::More;
 
-plan ( tests => 4 );
+plan ( tests => 6 );
 
 use_ok( 'SDL::Video' ); 
   
@@ -24,6 +24,9 @@ isa_ok(SDL::Video::get_video_surface(), 'SDL::Surface', 'Checking if we get a su
 
 isa_ok(SDL::Video::get_video_info(), 'SDL::VideoInfo', 'Checking if we get videoinfo ref back');
 
+pass 'This is your driver name: '.SDL::Video::video_driver_name(10);
+pass "Are we still alive?";
+
 =skip
 	list_modes
 	video_mode_ok