From: Kartik Thakore <thakore.kartik@gmail.com>
Date: Wed, 4 Nov 2009 19:03:27 +0000 (-0500)
Subject: Added docs, XS , PM and test file stubs for SDL::MultiThread
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0a0ec342bb6c22ed3d891a54a33b5cf6fdb2aa26;p=sdlgit%2FSDL_perl.git

Added docs, XS , PM and test file stubs for SDL::MultiThread
---

diff --git a/Build.PL b/Build.PL
index 595c8da..c9c2284 100644
--- a/Build.PL
+++ b/Build.PL
@@ -49,6 +49,13 @@ my %subsystems =
 		},
 		libraries => [qw( SDL )],
 	},
+	MultiThread => {
+		file      => {
+			from  => 'src/Core/MultiThread.xs',
+			to    => 'lib/SDL/MultiThread.xs',
+		},
+		libraries => [qw( SDL )],
+	},
 	Video => {
 		file      => {
 			from  => 'src/Core/Video.xs',
diff --git a/lib/SDL/MultiThread.pm b/lib/SDL/MultiThread.pm
new file mode 100644
index 0000000..9807794
--- /dev/null
+++ b/lib/SDL/MultiThread.pm
@@ -0,0 +1,9 @@
+package SDL::MultiThread;
+use strict;
+use warnings;
+require Exporter;
+require DynaLoader;
+our @ISA = qw(Exporter DynaLoader);
+bootstrap SDL::MultiThread;
+
+1;
diff --git a/lib/pods/SDL/MultiThread.pod b/lib/pods/SDL/MultiThread.pod
new file mode 100644
index 0000000..3162010
--- /dev/null
+++ b/lib/pods/SDL/MultiThread.pod
@@ -0,0 +1,12 @@
+=pod
+
+=head1 NAME
+
+SDL::Video - Bindings to the MultiThread category in SDL API
+
+=head1 SYNOPSIS
+
+This module is not an object. 
+
+
+=cut
diff --git a/src/Core/MultiThread.xs b/src/Core/MultiThread.xs
index e69de29..729c516 100644
--- a/src/Core/MultiThread.xs
+++ b/src/Core/MultiThread.xs
@@ -0,0 +1,27 @@
+#include "EXTERN.h"
+#include "perl.h"
+#include "XSUB.h"
+
+#ifndef aTHX_
+#define aTHX_
+#endif
+
+#include <SDL.h>
+#include <SDL_thread.h>
+
+MODULE = SDL::MultiThread 	PACKAGE = SDL::MultiThread    PREFIX = multi_
+
+=for documentation
+
+The Following are XS bindings to the MultiThread category in the SDL API v2.1.13
+
+Describe on the SDL API site.
+
+See: L<http://www.libsdl.org/cgi/docwiki.cgi/SDL_API>
+
+=cut
+
+Uint32
+multi_threadID()
+	CODE:
+		warn(" ... " );
diff --git a/t/core_multi.t b/t/core_multi.t
index d075d36..702ece3 100644
--- a/t/core_multi.t
+++ b/t/core_multi.t
@@ -8,10 +8,11 @@ plan ( tests => 4 );
 my @done =qw/ none /;
 
 
+use_ok( 'SDL::MultiThread' ); 
 SKIP:
 {
-skip 'Not implemented', 2; 
-use_ok( 'SDL::MultiThread' ); 
+skip 'Not implemented', 1; 
+
 can_ok ('SDL::MultiThread ', @done); 
 }