summaryrefslogtreecommitdiff
path: root/src/perl/common/typemap
blob: 5b7e0c32836c268e2529778964bb955eeef2c347 (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
26
27
28
29
30
31
32
TYPEMAP
Irssi::Chatnet		T_IrssiObj
Irssi::Server		T_IrssiObj
Irssi::Connect		T_IrssiObj
Irssi::Reconnect	T_PlainObj
Irssi::Channel		T_IrssiObj
Irssi::Query		T_IrssiObj
Irssi::Command		T_PlainObj
Irssi::Nick		T_IrssiObj
Irssi::Ignore		T_PlainObj
Irssi::Log		T_PlainObj
Irssi::Logitem       	T_PlainObj
Irssi::Rawlog		T_PlainObj
Irssi::Module		T_PlainObj
Irssi::Windowitem	T_IrssiObj

INPUT

T_IrssiObj
	$var = irssi_ref_object($arg)

T_PlainObj
	$var = irssi_ref_object($arg)

OUTPUT

T_IrssiObj
	$arg = iobject_bless((SERVER_REC *)$var);

T_PlainObj
	$arg = plain_bless($var, \"$type\");