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

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

diff --git a/src/Core/objects/Overlay.xs b/src/Core/objects/Overlay.xs
new file mode 100644 (file)
index 0000000..0793345
--- /dev/null
+++ b/src/Core/objects/Overlay.xs
@@ -0,0 +1,28 @@
+#include "EXTERN.h"
+#include "perl.h"
+#include "XSUB.h"
+
+#ifndef aTHX_
+#define aTHX_
+#endif
+
+#include <SDL.h>
+
+MODULE = SDL::Overlay  PACKAGE = SDL::Overlay    PREFIX = overlay_
+
+=for documentation
+
+SDL_Overlay -- YUV video overlay
+
+typedef struct{
+  Uint32 format;
+  int w, h;
+  int planes;
+  Uint16 *pitches;
+  Uint8 **pixels;
+  Uint32 hw_overlay:1;
+} SDL_Overlay;
+}
+
+=cut
+