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 Irssi::Blob             T_PlainObj
  17
  18 INPUT
  19
  20 T_IrssiObj
  21         $var = irssi_ref_object($arg)
  22
  23 T_PlainObj
  24         $var = irssi_ref_object($arg)
  25
  26 OUTPUT
  27
  28 T_IrssiObj
  29         $arg = iobject_bless((SERVER_REC *)$var);
  30
  31 T_PlainObj
  32         $arg = plain_bless($var, \"$type\");
  33