blob: 5aaa2f66842307d14380bbf5b81f5e03119f44f6 (
plain)
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
|
TYPEMAP
const char * T_PV
const void * T_PV
int * T_PV
void ** T_PACKED
enum newtFlagsSense T_IV
enum newtGridElement T_IV
SV ** T_SV
Newt::Component NewtComponent
Newt::Grid NewtGrid
INPUT
NewtComponent
$var = ($type) SvIV((SV*)SvRV($arg))
NewtGrid
$var = ($type) SvIV((SV*)SvRV($arg))
OUTPUT
NewtComponent
sv_setref_pv($arg, "Newt::Component", (void*) $var);
NewtGrid
sv_setref_pv($arg, "Newt::Grid", (void*) $var);
|