diff -r 7252d4888bf2 -r a6b831ab1d13 gtk/plugins/perl/common/Gtk.xs --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/gtk/plugins/perl/common/Gtk.xs Sat Sep 02 05:31:10 2006 +0000 @@ -0,0 +1,76 @@ +#include "gtkmodule.h" + +/* +#define GAIM_PERL_BOOT_PROTO(x) \ + void boot_Gaim__##x(pTHX_ CV *cv); + +#define GAIM_PERL_BOOT(x) \ + gaim_perl_callXS(boot_Gaim__##x, cv, mark) + +static void +gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark) +{ + dSP; + + PUSHMARK(mark); + (*subaddr)(aTHX_ cv); + + PUTBACK; +} +*/ + +/* Prototypes for the BOOT section below. */ +GAIM_PERL_BOOT_PROTO(Gtk__Account); +GAIM_PERL_BOOT_PROTO(Gtk__BuddyList); +GAIM_PERL_BOOT_PROTO(Gtk__Connection); +GAIM_PERL_BOOT_PROTO(Gtk__Conversation); +GAIM_PERL_BOOT_PROTO(Gtk__Conversation__Window); +GAIM_PERL_BOOT_PROTO(Gtk__Debug); +GAIM_PERL_BOOT_PROTO(Gtk__Dialogs); +GAIM_PERL_BOOT_PROTO(Gtk__IMHtml); +GAIM_PERL_BOOT_PROTO(Gtk__IMHtmlToolbar); +GAIM_PERL_BOOT_PROTO(Gtk__Log); +GAIM_PERL_BOOT_PROTO(Gtk__MenuTray); +GAIM_PERL_BOOT_PROTO(Gtk__Plugin); +GAIM_PERL_BOOT_PROTO(Gtk__PluginPref); +GAIM_PERL_BOOT_PROTO(Gtk__Pounce); +GAIM_PERL_BOOT_PROTO(Gtk__Prefs); +GAIM_PERL_BOOT_PROTO(Gtk__Privacy); +GAIM_PERL_BOOT_PROTO(Gtk__Roomlist); +GAIM_PERL_BOOT_PROTO(Gtk__Status); +GAIM_PERL_BOOT_PROTO(Gtk__Session); +GAIM_PERL_BOOT_PROTO(Gtk__Sound); +GAIM_PERL_BOOT_PROTO(Gtk__StatusBox); +GAIM_PERL_BOOT_PROTO(Gtk__Themes); +GAIM_PERL_BOOT_PROTO(Gtk__Utils); +GAIM_PERL_BOOT_PROTO(Gtk__Xfer); + +MODULE = Gaim::Gtk PACKAGE = Gaim::Gtk PREFIX = gaim_gtk_ +PROTOTYPES: ENABLE + +BOOT: + GAIM_PERL_BOOT(Gtk__Debug); +GAIM_PERL_BOOT(Gtk__Account); +GAIM_PERL_BOOT(Gtk__BuddyList); +GAIM_PERL_BOOT(Gtk__Connection); +GAIM_PERL_BOOT(Gtk__Conversation); +GAIM_PERL_BOOT(Gtk__Conversation__Window); +GAIM_PERL_BOOT(Gtk__Debug); +GAIM_PERL_BOOT(Gtk__Dialogs); +GAIM_PERL_BOOT(Gtk__IMHtml); +GAIM_PERL_BOOT(Gtk__IMHtmlToolbar); +GAIM_PERL_BOOT(Gtk__Log); +GAIM_PERL_BOOT(Gtk__MenuTray); +GAIM_PERL_BOOT(Gtk__Plugin); +GAIM_PERL_BOOT(Gtk__PluginPref); +GAIM_PERL_BOOT(Gtk__Pounce); +GAIM_PERL_BOOT(Gtk__Prefs); +GAIM_PERL_BOOT(Gtk__Privacy); +GAIM_PERL_BOOT(Gtk__Roomlist); +GAIM_PERL_BOOT(Gtk__Status); +GAIM_PERL_BOOT(Gtk__Session); +GAIM_PERL_BOOT(Gtk__Sound); +GAIM_PERL_BOOT(Gtk__StatusBox); +GAIM_PERL_BOOT(Gtk__Themes); +GAIM_PERL_BOOT(Gtk__Utils); +GAIM_PERL_BOOT(Gtk__Xfer);