• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

plugins/perl/libgaimperl.c@77abb6df8ee6 (annotated)

plugins/perl/libgaimperl.c

Thu, 08 Dec 2005 21:07:24 +0000

author

Richard Laager <rlaager@pidgin.im>

date

Thu, 08 Dec 2005 21:07:24 +0000

changeset 12418

77abb6df8ee6

parent 11862

5d4bc6d54688

permissions

-rw-r--r--

[gaim-migrate @ 14725]
Prototype this ugly hack.

11862 5d4bc6d54688 [gaim-migrate @ 14153] Stu Tomlinson <nosnilmot@pidgin.im> parents: 11120 diff changeset	1	#include <gmodule.h>
12418 77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	2	void __attribute__ ((constructor)) my_init(void);
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	3
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	4	void __attribute__ ((constructor)) my_init() {
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	5	/* Very evil hack...puts perl.so's symbols in the global table
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	6	* but does not create a circular dependancy because g_module_open
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	7	* will only open the library once. */
11120 beeb901ca8a9 [gaim-migrate @ 13176] John H. Kelm <johnkelm@gmail.com> parents: diff changeset	8	g_module_open("perl.so", 0);
beeb901ca8a9 [gaim-migrate @ 13176] John H. Kelm <johnkelm@gmail.com> parents: diff changeset	9	}