libgaim/plugins/perl/libgaimperl.c@77edc7a6191a (annotated)
libgaim/plugins/perl/libgaimperl.c
Sat, 19 Aug 2006 01:50:10 +0000
- author
- Evan Schoenberg <evands@pidgin.im>
- date
- Sat, 19 Aug 2006 01:50:10 +0000
- changeset 14254
- 77edc7a6191a
- parent 14253
- core/plugins/perl/libgaimperl.c@b63ebf84c42b
- child 20470
- 77693555855f
- permissions
- -rw-r--r--
[gaim-migrate @ 16863]
Renamed 'core' to 'libgaim'
|
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 | 8 | g_module_open("perl.so", 0); |
| 9 | } |
