1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
  
     | 
    
      #define PERL_NO_GET_CONTEXT
#ifdef __cplusplus
extern "C" {
#endif
#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"
#include "ppport.h"
#ifdef __cplusplus
}
#endif
#include "imext.h"
#include "imperl.h"
void 
mandelbrot(i_img *im, double minx, double miny, double maxx, double maxy, int max_iter);
DEFINE_IMAGER_CALLBACKS;
MODULE = Imager::Filter::Mandelbrot   PACKAGE = Imager::Filter::Mandelbrot
PROTOTYPES: ENABLE
void
mandelbrot(im, minx=-2.5, miny=-2.0, maxx=2.5, maxy=-2.0, max_iter=256)
        Imager::ImgRaw im
        double minx
        double miny
        double maxx
        double maxy
        int max_iter
BOOT:
        PERL_INITIALIZE_IMAGER_CALLBACKS;
 
     |