view release on metacpan or  search on metacpan

Magick.xs  view on Meta::CPAN

MODULE        = Prima::Image::Magick		PACKAGE       = Prima::Image::Magick

BOOT:
{
	prima_bootcheck();
}

void 
convert_to_magick(prima_image,magick_image)
PROTOTYPE: DISABLE
PPCODE:
{
	pim_image pim;
	Image * ip;

	SV * sv;
	AV * av;
	HV * hv;

	ImageInfo *info;
	char sizebuf[64];

Magick.xs  view on Meta::CPAN

	/* store as Image::Magick object */
	sv = newSViv(( IV) ip);
	av_push( av, sv_bless( newRV( sv), hv));
	SvREFCNT_dec( sv);
}

void 
convert_to_prima(magick_image,prima_image)
PROTOTYPE: DISABLE
PPCODE:
{
	Image * ip;
	pim_image pim;
#if MagickLibVersion > 0x676
	ExceptionInfo* exception;
#else
	ExceptionInfo  exception_buf;
	ExceptionInfo* exception = &exception_buf;
#endif
	unsigned char * buffer;