Added SDL_Pallete Capability

diff --git a/Build.PL b/Build.PL
index c8b3f8a..96d6217 100644 (file)
--- a/Build.PL
+++ b/Build.PL
@@ -84,6 +84,14 @@ my %subsystems =
                },
                libraries => [qw( SDL )],
        },
+       Palette => {
+               file      => {
+                       from  => 'src/Core/objects/Palette.xs',
+                       to    => 'lib/SDL/Palette.xs',
+               },
+               libraries => [qw( SDL )],
+       },
+
        VideoInfo => {
                file      => {
                        from  => 'src/Core/objects/VideoInfo.xs',

diff --git a/src/SDL.xs b/src/SDL.xs
index 13d20c6..aadfd96 100644 (file)
--- a/src/SDL.xs
+++ b/src/SDL.xs
@@ -1322,22 +1322,6 @@ UpdateRects ( surface, ... )
 
 Comment out for now as it does not compile
 
-SDL_Color *
-PaletteColors ( palette, index, ... )
-       SDL_Palette *palette
-       int index
-       CODE:
-               if ( items > 2 ) {
-                       palette->colors[index].r = SvUV(ST(2)); 
-                       palette->colors[index].g = SvUV(ST(3)); 
-                       palette->colors[index].b = SvUV(ST(4)); 
-               }
-               RETVAL = (SDL_Color *)(palette->colors + index);
-       OUTPUT:
-               RETVAL
-
-
-
 int
 VideoModeOK ( width, height, bpp, flags )
        int width