Mercurial > pidgin
view plugins/perl/common/Log.xs @ 11318:519dc2186438
[gaim-migrate @ 13521]
Bits and pieces all over the place. I was hunting down compiler warnings
all over the place, with crazy CFLAGS. I think I might have got a bit
carried away.
I made the perl stuff compile with gcc 2.x (which don't support
mixed declerations and statements), I think what I did was safe but
readily admit I have no clue how all the perl stuff works.
Rename gaim_presence_add_presence() to gaim_presence_add_list() (to match
the header file - obviously nothing actually _uses_ this)
Implement gaim_savedstatus_get_handle() because it's in the header file.
Remove gaim_account_set_presence() from account.h - it's not actually
implemented anywhere, so it can't be that important.
committer: Tailor Script <tailor@pidgin.im>
author | Stu Tomlinson <stu@nosnilmot.com> |
---|---|
date | Sat, 20 Aug 2005 20:17:08 +0000 |
parents | ad976105c306 |
children | c886fc7e3f24 |
line wrap: on
line source
#include "module.h" MODULE = Gaim::Log PACKAGE = Gaim::Log PREFIX = gaim_log_ PROTOTYPES: ENABLE int gaim_log_common_sizer(log) Gaim::Log log void gaim_log_common_writer(log, ext) Gaim::Log log const char *ext gint gaim_log_compare(y, z) gconstpointer y gconstpointer z void gaim_log_free(log) Gaim::Log log char * gaim_log_get_log_dir(type, name, account) Gaim::LogType type const char *name Gaim::Account account void gaim_log_get_log_sets() PREINIT: GHashTable *l; PPCODE: l = gaim_log_get_log_sets(); XPUSHs(sv_2mortal(gaim_perl_bless_object(l, "GHashTable"))); void gaim_log_get_logs(type, name, account) Gaim::LogType type const char *name Gaim::Account account PREINIT: GList *l; PPCODE: for (l = gaim_log_get_logs(type, name, account); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); } int gaim_log_get_size(log) Gaim::Log log void gaim_log_get_system_logs(account) Gaim::Account account PREINIT: GList *l; PPCODE: for (l = gaim_log_get_system_logs(account); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); } int gaim_log_get_total_size(type, name, account) Gaim::LogType type const char *name Gaim::Account account void gaim_log_init() void gaim_log_logger_free(logger) Gaim::Log::Logger logger void gaim_log_logger_get_options() PREINIT: GList *l; PPCODE: for (l = gaim_log_logger_get_options(); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry"))); } char * gaim_log_read(log, flags) Gaim::Log log Gaim::Log::ReadFlags flags gint gaim_log_set_compare(y, z) gconstpointer y gconstpointer z