]> git.imager.perl.org - imager.git/blob - PNG/PNG.xs
[rt #69243] simplify XS for i_findcolor()
[imager.git] / PNG / PNG.xs
1 #define PERL_NO_GET_CONTEXT
2 #ifdef __cplusplus
3 extern "C" {
4 #endif
5 #include "EXTERN.h"
6 #include "perl.h"
7 #include "XSUB.h"
8 #include "imext.h"
9 #include "imperl.h"
10 #include "impng.h"
11
12 DEFINE_IMAGER_CALLBACKS;
13
14 MODULE = Imager::File::PNG  PACKAGE = Imager::File::PNG
15
16 Imager::ImgRaw
17 i_readpng_wiol(ig)
18         Imager::IO     ig
19
20 undef_int
21 i_writepng_wiol(im, ig)
22     Imager::ImgRaw     im
23         Imager::IO     ig
24
25 unsigned
26 i_png_lib_version()
27
28 BOOT:
29         PERL_INITIALIZE_IMAGER_CALLBACKS;