]> git.imager.perl.org - imager.git/blobdiff - ICO/ICO.xs
PNG re-work: read 16-bit PNG as 16-bit
[imager.git] / ICO / ICO.xs
index bb239817526f89ba5ccf71abc9417281eb214a61..333c6fbb9bbcf7ded10311ae055eed1fe4e3b8a1 100644 (file)
@@ -1,9 +1,11 @@
+#define PERL_NO_GET_CONTEXT
 #include "EXTERN.h"
 #include "perl.h"
 #include "XSUB.h"
 #include "imext.h"
 #include "imperl.h"
 #include "imicon.h"
+#include "ppport.h"
 
 DEFINE_IMAGER_CALLBACKS;
 
@@ -12,19 +14,21 @@ MODULE = Imager::File::ICO  PACKAGE = Imager::File::ICO
 PROTOTYPES: DISABLE
 
 Imager::ImgRaw
-i_readico_single(ig, index)
+i_readico_single(ig, index, masked = 0)
        Imager::IO ig
        int index
+       bool masked
 
 void
-i_readico_multi(ig)
+i_readico_multi(ig, masked = 0)
        Imager::IO ig
+       bool masked
       PREINIT:
         i_img **imgs;
         int count;
         int i;
       PPCODE:
-        imgs = i_readico_multi(ig, &count);
+        imgs = i_readico_multi(ig, &count, masked);
         if (imgs) {
           EXTEND(SP, count);
           for (i = 0; i < count; ++i) {