Mercurial > pidgin3 / annotate

libpurple/plugins/perl/common/Gaim.xs@b2f272e0c51e (annotated)

libpurple/plugins/perl/common/Gaim.xs

Sun, 11 Feb 2007 00:30:48 +0000

author
Daniel Atallah <datallah@pidgin.im>
date
Sun, 11 Feb 2007 00:30:48 +0000
changeset 15677
b2f272e0c51e
parent 15435
4b933b06d75e
permissions
-rw-r--r--

Suppress warnings about unused variables in the generated perl bindings

6508
57d1df1ca3a0 [gaim-migrate @ 7025]
Christian Hammond <chipx86@chipx86.com>
parents:
diff changeset
1 #include "module.h"
6520
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
2 #include "../perl-handlers.h"
6588
187c6026c574 [gaim-migrate @ 7110]
Christian Hammond <chipx86@chipx86.com>
parents: 6584
diff changeset
3 #include "const-c.inc"
187c6026c574 [gaim-migrate @ 7110]
Christian Hammond <chipx86@chipx86.com>
parents: 6584
diff changeset
4
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
5 /* Prototypes for the BOOT section below. */
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
6 GAIM_PERL_BOOT_PROTO(Account);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
7 GAIM_PERL_BOOT_PROTO(Account__Option);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
8 GAIM_PERL_BOOT_PROTO(Buddy__Icon);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
9 GAIM_PERL_BOOT_PROTO(BuddyList);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
10 GAIM_PERL_BOOT_PROTO(Cipher);
12882
44dfc6467081 [gaim-migrate @ 15234]
Etan Reisner <deryni@pidgin.im>
parents: 12419
diff changeset
11 GAIM_PERL_BOOT_PROTO(Cmd);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
12 GAIM_PERL_BOOT_PROTO(Connection);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
13 GAIM_PERL_BOOT_PROTO(Conversation);
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
14 GAIM_PERL_BOOT_PROTO(Core);
13191
6c98c6130701 [gaim-migrate @ 15553]
Etan Reisner <deryni@pidgin.im>
parents: 12882
diff changeset
15 GAIM_PERL_BOOT_PROTO(Debug);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
16 GAIM_PERL_BOOT_PROTO(Xfer);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
17 GAIM_PERL_BOOT_PROTO(ImgStore);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
18 GAIM_PERL_BOOT_PROTO(Log);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
19 GAIM_PERL_BOOT_PROTO(Network);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
20 GAIM_PERL_BOOT_PROTO(Notify);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
21 GAIM_PERL_BOOT_PROTO(Plugin);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
22 GAIM_PERL_BOOT_PROTO(PluginPref);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
23 GAIM_PERL_BOOT_PROTO(Pounce);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
24 GAIM_PERL_BOOT_PROTO(Prefs);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
25 GAIM_PERL_BOOT_PROTO(Privacy);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
26 GAIM_PERL_BOOT_PROTO(Proxy);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
27 GAIM_PERL_BOOT_PROTO(Prpl);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
28 GAIM_PERL_BOOT_PROTO(Request);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
29 GAIM_PERL_BOOT_PROTO(Roomlist);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
30 GAIM_PERL_BOOT_PROTO(SSL);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
31 GAIM_PERL_BOOT_PROTO(SavedStatus);
13490
9e37340d4b84 [gaim-migrate @ 15865]
Etan Reisner <deryni@pidgin.im>
parents: 13191
diff changeset
32 GAIM_PERL_BOOT_PROTO(Serv);
13191
6c98c6130701 [gaim-migrate @ 15553]
Etan Reisner <deryni@pidgin.im>
parents: 12882
diff changeset
33 GAIM_PERL_BOOT_PROTO(Signal);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
34 GAIM_PERL_BOOT_PROTO(Sound);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
35 GAIM_PERL_BOOT_PROTO(Status);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
36 GAIM_PERL_BOOT_PROTO(Stringref);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
37 GAIM_PERL_BOOT_PROTO(Util);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
38 GAIM_PERL_BOOT_PROTO(XMLNode);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
39
6588
187c6026c574 [gaim-migrate @ 7110]
Christian Hammond <chipx86@chipx86.com>
parents: 6584
diff changeset
40 MODULE = Gaim PACKAGE = Gaim PREFIX = gaim_
6508
57d1df1ca3a0 [gaim-migrate @ 7025]
Christian Hammond <chipx86@chipx86.com>
parents:
diff changeset
41 PROTOTYPES: ENABLE
57d1df1ca3a0 [gaim-migrate @ 7025]
Christian Hammond <chipx86@chipx86.com>
parents:
diff changeset
42
6588
187c6026c574 [gaim-migrate @ 7110]
Christian Hammond <chipx86@chipx86.com>
parents: 6584
diff changeset
43 INCLUDE: const-xs.inc
187c6026c574 [gaim-migrate @ 7110]
Christian Hammond <chipx86@chipx86.com>
parents: 6584
diff changeset
44
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
45 BOOT:
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
46 GAIM_PERL_BOOT(Account);
12882
44dfc6467081 [gaim-migrate @ 15234]
Etan Reisner <deryni@pidgin.im>
parents: 12419
diff changeset
47 GAIM_PERL_BOOT(Account__Option);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
48 GAIM_PERL_BOOT(Buddy__Icon);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
49 GAIM_PERL_BOOT(BuddyList);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
50 GAIM_PERL_BOOT(Cipher);
12882
44dfc6467081 [gaim-migrate @ 15234]
Etan Reisner <deryni@pidgin.im>
parents: 12419
diff changeset
51 GAIM_PERL_BOOT(Cmd);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
52 GAIM_PERL_BOOT(Connection);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
53 GAIM_PERL_BOOT(Conversation);
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
54 GAIM_PERL_BOOT(Core);
13191
6c98c6130701 [gaim-migrate @ 15553]
Etan Reisner <deryni@pidgin.im>
parents: 12882
diff changeset
55 GAIM_PERL_BOOT(Debug);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
56 GAIM_PERL_BOOT(Xfer);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
57 GAIM_PERL_BOOT(ImgStore);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
58 GAIM_PERL_BOOT(Log);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
59 GAIM_PERL_BOOT(Network);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
60 GAIM_PERL_BOOT(Notify);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
61 GAIM_PERL_BOOT(Plugin);
12882
44dfc6467081 [gaim-migrate @ 15234]
Etan Reisner <deryni@pidgin.im>
parents: 12419
diff changeset
62 GAIM_PERL_BOOT(PluginPref);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
63 GAIM_PERL_BOOT(Pounce);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
64 GAIM_PERL_BOOT(Prefs);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
65 GAIM_PERL_BOOT(Privacy);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
66 GAIM_PERL_BOOT(Proxy);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
67 GAIM_PERL_BOOT(Prpl);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
68 GAIM_PERL_BOOT(Request);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
69 GAIM_PERL_BOOT(Roomlist);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
70 GAIM_PERL_BOOT(SSL);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
71 GAIM_PERL_BOOT(SavedStatus);
13490
9e37340d4b84 [gaim-migrate @ 15865]
Etan Reisner <deryni@pidgin.im>
parents: 13191
diff changeset
72 GAIM_PERL_BOOT(Serv);
13191
6c98c6130701 [gaim-migrate @ 15553]
Etan Reisner <deryni@pidgin.im>
parents: 12882
diff changeset
73 GAIM_PERL_BOOT(Signal);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
74 GAIM_PERL_BOOT(Sound);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
75 GAIM_PERL_BOOT(Status);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
76 GAIM_PERL_BOOT(Stringref);
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
77 GAIM_PERL_BOOT(Util);
12882
44dfc6467081 [gaim-migrate @ 15234]
Etan Reisner <deryni@pidgin.im>
parents: 12419
diff changeset
78 GAIM_PERL_BOOT(XMLNode);
12419
745d9e5460ea [gaim-migrate @ 14726]
Richard Laager <rlaager@pidgin.im>
parents: 12364
diff changeset
79
6508
57d1df1ca3a0 [gaim-migrate @ 7025]
Christian Hammond <chipx86@chipx86.com>
parents:
diff changeset
80 void
6918
46c9836b0072 [gaim-migrate @ 7465]
Christian Hammond <chipx86@chipx86.com>
parents: 6735
diff changeset
81 timeout_add(plugin, seconds, callback, data = 0)
6520
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
82 Gaim::Plugin plugin
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
83 int seconds
6568
5c8c70b63dc3 [gaim-migrate @ 7090]
Christian Hammond <chipx86@chipx86.com>
parents: 6567
diff changeset
84 SV *callback
6552
e3fa6a85614b [gaim-migrate @ 7074]
Christian Hammond <chipx86@chipx86.com>
parents: 6550
diff changeset
85 SV *data
6520
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
86 CODE:
6568
5c8c70b63dc3 [gaim-migrate @ 7090]
Christian Hammond <chipx86@chipx86.com>
parents: 6567
diff changeset
87 gaim_perl_timeout_add(plugin, seconds, callback, data);
6520
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
88
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
89 void
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
90 deinit()
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
91 CODE:
5386692555c9 [gaim-migrate @ 7037]
Christian Hammond <chipx86@chipx86.com>
parents: 6508
diff changeset
92 gaim_perl_timeout_clear();
15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
93
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
94
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
95 MODULE = Gaim PACKAGE = Gaim PREFIX = gaim_
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
96 PROTOTYPES: ENABLE
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
97
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
98 Gaim::Core
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents: 14254
diff changeset
99 gaim_get_core()

Mercurial Repository: pidgin3

mercurial