From: Kartik Thakore <thakore.kartik@gmail.com>
Date: Thu, 22 Oct 2009 19:18:22 +0000 (-0400)
Subject: Added more bindings for Overlay
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=sdlgit%2FSDL_perl.git;a=commitdiff_plain;h=f73f699aff1bce1c02d5e88f3c20f34f2793dbda

Added more bindings for Overlay
---

diff --git a/src/Core/objects/Overlay.xs b/src/Core/objects/Overlay.xs
index fb6fe27..1d03b17 100644
--- a/src/Core/objects/Overlay.xs
+++ b/src/Core/objects/Overlay.xs
@@ -38,6 +38,47 @@ overlay_new(CLASS, width, height, format, display)
 	OUTPUT:
 		RETVAL
 
+int
+overlay_w( overlay )
+	SDL_Overlay* overlay
+	CODE:
+		RETVAL = overlay->w;
+	OUTPUT:
+		RETVAL
+
+int
+overlay_h( overlay )
+	SDL_Overlay* overlay
+	CODE:
+		RETVAL = overlay->h;
+	OUTPUT:
+		RETVAL
+
+int
+overlay_planes( overlay )
+	SDL_Overlay* overlay
+	CODE:
+		RETVAL = overlay->planes;
+	OUTPUT:
+		RETVAL
+
+Uint32 
+overlay_hwoverlay( overlay )
+	SDL_Overlay* overlay
+	CODE:
+		RETVAL = overlay->hw_overlay;		
+	OUTPUT:
+		RETVAL
+
+Uint32
+overlay_format( overlay )
+	SDL_Overlay* overlay
+	CODE:
+		RETVAL = overlay->format;		
+	OUTPUT:
+		RETVAL
+
+
 void
 overlay_DESTROY(overlay)
 	SDL_Overlay *overlay