Added last two objects (Overlay and VideoInfo) XS files for Video

[sdlgit/SDL_perl.git] / src / Core / objects / VideoInfo.xs

diff --git a/src/Core/objects/VideoInfo.xs b/src/Core/objects/VideoInfo.xs
new file mode 100644 (file)
index 0000000..55b55ec
--- /dev/null
+++ b/src/Core/objects/VideoInfo.xs
@@ -0,0 +1,36 @@
+#include "EXTERN.h"
+#include "perl.h"
+#include "XSUB.h"
+
+#ifndef aTHX_
+#define aTHX_
+#endif
+
+#include <SDL.h>
+
+MODULE = SDL::VideoInfo        PACKAGE = SDL::VideoInfo    PREFIX = videoinfo_
+
+=for documentation
+
+SDL_VideoInfo -- Video target information
+
+typedef struct{
+    Uint32 hw_available:1;
+    Uint32 wm_available:1;
+    Uint32 blit_hw:1;
+    Uint32 blit_hw_CC:1;
+    Uint32 blit_hw_A:1;
+    Uint32 blit_sw:1;
+    Uint32 blit_sw_CC:1;
+    Uint32 blit_sw_A:1;
+    Uint32 blit_fill:1;
+    Uint32 video_mem;
+    SDL_PixelFormat *vfmt;
+    int current_w;
+    int current_h;
+} SDL_VideoInfo;
+
+
+
+=cut
+