polish/test darwin support
[imager-screenshot.git] / Screenshot.xs
index 1892aa1..dd9dd0c 100644 (file)
@@ -16,7 +16,7 @@ PROTOTYPES: DISABLE
 
 #ifdef SS_WIN32
 
-Imager
+Imager::ImgRaw
 imss_win32(hwnd, include_decor = 0, left = 0, top = 0, right = 0, bottom = 0)
        unsigned hwnd
        int include_decor
@@ -29,7 +29,7 @@ imss_win32(hwnd, include_decor = 0, left = 0, top = 0, right = 0, bottom = 0)
 
 #ifdef SS_X11
 
-Imager
+Imager::ImgRaw
 imss_x11(display, window_id, left = 0, top = 0, right = 0, bottom = 0)
         unsigned long display
        int window_id
@@ -48,5 +48,16 @@ imss_x11_close(display)
 
 #endif
 
+#ifdef SS_DARWIN
+
+Imager::ImgRaw
+imss_darwin(left = 0, top = 0, right = 0, bottom = 0)
+       int left
+       int top
+       int right
+       int bottom
+
+#endif
+
 BOOT:
        PERL_INITIALIZE_IMAGER_CALLBACKS;
\ No newline at end of file