DynTest/DynTest.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 "ppport.h"
   9 #ifdef __cplusplus
  10 }
  11 #endif
  12
  13 #include "imext.h"
  14 #include "imperl.h"
  15
  16 extern void lin_stretch(i_img *, int, int);
  17
  18 DEFINE_IMAGER_CALLBACKS;
  19
  20 MODULE = Imager::Filter::DynTest   PACKAGE = Imager::Filter::DynTest
  21
  22 PROTOTYPES: ENABLE
  23
  24 void
  25 lin_stretch(im, a, b)
  26         Imager::ImgRaw im
  27         int a
  28         int b
  29
  30 BOOT:
  31         PERL_INITIALIZE_IMAGER_CALLBACKS;
  32