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

libpurple/plugins/perl/libpurpleperl.c@46933dc62880 (annotated)

libpurple/plugins/perl/libpurpleperl.c

Sun, 15 Apr 2007 03:43:17 +0000

author

Richard Laager <rlaager@pidgin.im>

date

Sun, 15 Apr 2007 03:43:17 +0000

branch

cpw.khc.msnp14

changeset 20478

46933dc62880

parent 20472

libgaim/plugins/perl/libgaimperl.c@6a6d2ef151e6

parent 15987

libgaim/plugins/perl/libgaimperl.c@71d668c3d56d

child 20481

65485e2ed8a3

permissions

-rw-r--r--

propagate from branch 'im.pidgin.pidgin' (head 88b7040408c88e4516c008f4eac579f98ef53e85)
to branch 'im.pidgin.rlaager.merging.msnp13-and-pidgin' (head 198222e01a7dc9f8795f68ec618a48c3478e04a8)

11862 5d4bc6d54688 [gaim-migrate @ 14153] Stu Tomlinson <nosnilmot@pidgin.im> parents: 11120 diff changeset	1	#include <gmodule.h>
15611 5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	2
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	3	#ifdef __SUNPRO_C
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	4	#pragma init (my_init)
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	5	void my_init(void);
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	6
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	7	void my_init() {
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	8	#else
12418 77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	9	void __attribute__ ((constructor)) my_init(void);
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	10
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	11	void __attribute__ ((constructor)) my_init() {
15611 5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	12	#endif
5cb407a7d44a SF Patch #1637687 from Damien Carbery Richard Laager <rlaager@pidgin.im> parents: 15435 diff changeset	13
12418 77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	14	/* 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	15	* but does not create a circular dependancy because g_module_open
77abb6df8ee6 [gaim-migrate @ 14725] Richard Laager <rlaager@pidgin.im> parents: 11862 diff changeset	16	* will only open the library once. */
11120 beeb901ca8a9 [gaim-migrate @ 13176] John H. Kelm <johnkelm@gmail.com> parents: diff changeset	17	g_module_open("perl.so", 0);
beeb901ca8a9 [gaim-migrate @ 13176] John H. Kelm <johnkelm@gmail.com> parents: diff changeset	18	}