src/perl.c

changeset 4886
c2952ac92b32
parent 4884
71a60ce453cd
child 5068
0d4c4df65dd0
equal deleted inserted replaced
4885:79c3c7b53e70 4886:c2952ac92b32
31 #endif 31 #endif
32 #endif 32 #endif
33 #undef PACKAGE 33 #undef PACKAGE
34 34
35 #ifdef USE_PERL 35 #ifdef USE_PERL
36
37 #ifndef call_pv
38 # define call_pv(i,j) perl_call_pv(i,j)
39 #endif
40 36
41 #define group perl_group 37 #define group perl_group
42 #ifdef _WIN32 38 #ifdef _WIN32
43 /* This took me an age to figure out.. without this __declspec(dllimport) 39 /* This took me an age to figure out.. without this __declspec(dllimport)
44 * will be ignored. 40 * will be ignored.
84 #undef pipe 80 #undef pipe
85 #endif 81 #endif
86 #include "gaim.h" 82 #include "gaim.h"
87 #include "prpl.h" 83 #include "prpl.h"
88 #include "sound.h" 84 #include "sound.h"
85
86 #ifndef call_pv
87 # define call_pv(i,j) perl_call_pv(i,j)
88 #endif
89 89
90 struct perlscript { 90 struct perlscript {
91 char *name; 91 char *name;
92 char *version; 92 char *version;
93 char *shutdowncallback; /* bleh */ 93 char *shutdowncallback; /* bleh */

mercurial