image fills with images with channels not at 4 were broken
[imager.git] / typemap
CommitLineData
02d1d628
AMH
1#i_img * T_PTR_NULL
2Imager::Color T_PTROBJ
faa9b3e7 3Imager::Color::Float T_PTROBJ
02d1d628 4Imager::ImgRaw T_PTROBJ
4b19f77a 5Imager::Font::TT T_PTROBJ
02d1d628 6Imager::IO T_PTROBJ
faa9b3e7 7Imager::Font::FT2 T_PTROBJ
f1ac5027 8Imager::FillHandle T_PTROBJ
02d1d628
AMH
9const char * T_PV
10float T_FLOAT
11float* T_ARRAY
12undef_int T_IV_U
13HASH T_HVREF
1bd75e4c 14utf8_str T_UTF8_STR
02d1d628
AMH
15#############################################################################
16INPUT
17T_PTR_NULL
5997b792 18 if (SvOK($arg)) $var = INT2PTR($type,SvIV($arg));
02d1d628
AMH
19 else $var = NULL
20#############################################################################
21OUTPUT
22T_IV_U
23 if ($var == 0) $arg=&PL_sv_undef;
24 else sv_setiv($arg, (IV)$var);
25T_PTR_NULL
26 sv_setiv($arg, (IV)$var);