apps/irssi/src/perl/common/typemap

   1 TYPEMAP
   2 Irssi::Chatnet          T_IrssiObj
   3 Irssi::Server           T_IrssiObj
   4 Irssi::Connect          T_IrssiObj
   5 Irssi::Reconnect        T_PlainObj
   6 Irssi::Channel          T_IrssiObj
   7 Irssi::Query            T_IrssiObj
   8 Irssi::Command          T_PlainObj
   9 Irssi::Nick             T_IrssiObj
  10 Irssi::Ignore           T_PlainObj
  11 Irssi::Log              T_PlainObj
  12 Irssi::Logitem          T_PlainObj
  13 Irssi::Rawlog           T_PlainObj
  14 Irssi::Module           T_PlainObj
  15 Irssi::Windowitem       T_IrssiObj
  16
  17 INPUT
  18
  19 T_IrssiObj
  20         $var = irssi_ref_object($arg)
  21
  22 T_PlainObj
  23         $var = irssi_ref_object($arg)
  24
  25 OUTPUT
  26
  27 T_IrssiObj
  28         $arg = iobject_bless((SERVER_REC *)$var);
  29
  30 T_PlainObj
  31         $arg = plain_bless($var, \"$type\");
  32