summaryrefslogtreecommitdiff
path: root/src/perl/irc/typemap
blob: 928eceb630de963cbb68fe1b59e0773ddb5f3375 (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
TYPEMAP
Irssi::Irc::Server		T_IrssiObj
Irssi::Irc::Connect		T_IrssiObj
Irssi::Irc::Channel		T_IrssiObj
Irssi::Irc::Query		T_IrssiObj
Irssi::Irc::Nick		T_IrssiObj

Irssi::Irc::Ban			T_PlainObj
Irssi::Irc::Dcc			T_PlainObj
Irssi::Irc::Netsplit		T_PlainObj
Irssi::Irc::Netsplitserver	T_PlainObj
Irssi::Irc::Autoignore		T_PlainObj
Irssi::Irc::Notifylist		T_PlainObj

INPUT

T_IrssiObj
	$var = irssi_ref_object($arg)

T_PlainObj
	$var = irssi_ref_object($arg)

OUTPUT

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

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