t/core_surface is failing even when t/intergration1 is passing. Why?

[sdlgit/SDL_perl.git] / src / SDL.xs

diff --git a/src/SDL.xs b/src/SDL.xs
index cc0d135..4d41a37 100644 (file)
--- a/src/SDL.xs
+++ b/src/SDL.xs
@@ -1240,14 +1240,14 @@ PaletteNColors ( palette, ... )
                RETVAL
 
 SDL_Surface *
-SetVideoMode ( width, height, bpp, flags )
+SetVideoMode ( CLASS, width, height, bpp, flags )
+        char* CLASS
        int width
        int height
        int bpp
        Uint32 flags
 
        CODE:
-               char* CLASS;
                RETVAL = SDL_SetVideoMode(width,height,bpp,flags);
        OUTPUT:
                RETVAL