Mercurial > pidgin
comparison plugins/perl/libgaimperl.c @ 12418:a4229dd9c76a
[gaim-migrate @ 14725]
Prototype this ugly hack.
committer: Tailor Script <tailor@pidgin.im>
author | Richard Laager <rlaager@wiktel.com> |
---|---|
date | Thu, 08 Dec 2005 21:07:24 +0000 |
parents | f8cd06753755 |
children |
comparison
equal
deleted
inserted
replaced
12417:d30c0a7a5619 | 12418:a4229dd9c76a |
---|---|
1 #include <gmodule.h> | 1 #include <gmodule.h> |
2 void __attribute__ ((constructor)) my_init(void) { | 2 void __attribute__ ((constructor)) my_init(void); |
3 /* Very evil hack...puts perl.so's symbols in the global table */ | 3 |
4 /* but does not create a circular dependancy because g_module_open */ | 4 void __attribute__ ((constructor)) my_init() { |
5 /* will only open the library once. */ | 5 /* Very evil hack...puts perl.so's symbols in the global table |
6 * but does not create a circular dependancy because g_module_open | |
7 * will only open the library once. */ | |
6 g_module_open("perl.so", 0); | 8 g_module_open("perl.so", 0); |
7 } | 9 } |