use INT2PTR if available
[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
14#############################################################################
15INPUT
16T_PTR_NULL
17 if (SvOK($arg)) $var = ($type)SvIV($arg);
18 else $var = NULL
19#############################################################################
20OUTPUT
21T_IV_U
22 if ($var == 0) $arg=&PL_sv_undef;
23 else sv_setiv($arg, (IV)$var);
24T_PTR_NULL
25 sv_setiv($arg, (IV)$var);