libgaim/plugins/perl/common/Signal.xs

branch
cpw.khc.msnp14
changeset 20472
6a6d2ef151e6
parent 13191
6c98c6130701
parent 14779
1b71da367f56
equal deleted inserted replaced
13912:463b4fa9f067 20472:6a6d2ef151e6
1 #include "module.h"
2 #include "../perl-handlers.h"
3
4 MODULE = Gaim::Signal PACKAGE = Gaim::Signal PREFIX = gaim_signal_
5 PROTOTYPES: ENABLE
6
7 void
8 gaim_signal_connect_priority(instance, signal, plugin, callback, priority, data = 0)
9 Gaim::Handle instance
10 const char *signal
11 Gaim::Plugin plugin
12 SV *callback
13 int priority
14 SV *data
15 CODE:
16 gaim_perl_signal_connect(plugin, instance, signal, callback, data, priority);
17
18 void
19 gaim_signal_connect(instance, signal, plugin, callback, data = 0)
20 Gaim::Handle instance
21 const char *signal
22 Gaim::Plugin plugin
23 SV *callback
24 SV *data
25 CODE:
26 gaim_perl_signal_connect(plugin, instance, signal, callback, data, GAIM_SIGNAL_PRIORITY_DEFAULT);
27
28 void
29 gaim_signal_disconnect(instance, signal, plugin)
30 Gaim::Handle instance
31 const char *signal
32 Gaim::Plugin plugin
33 CODE:
34 gaim_perl_signal_disconnect(plugin, instance, signal);

mercurial