| 21 { \ |
21 { \ |
| 22 extern void boot_Gaim__##x(pTHX_ CV *cv); \ |
22 extern void boot_Gaim__##x(pTHX_ CV *cv); \ |
| 23 gaim_perl_callXS(boot_Gaim__##x, cv, mark); \ |
23 gaim_perl_callXS(boot_Gaim__##x, cv, mark); \ |
| 24 } |
24 } |
| 25 |
25 |
| |
26 void gaim_perl_normalize_script_name(char *name); |
| |
27 |
| |
28 |
| 26 SV *newSVGChar(const char *str); |
29 SV *newSVGChar(const char *str); |
| 27 |
30 |
| 28 void gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark); |
31 void gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark); |
| 29 void gaim_perl_bless_plain(const char *stash, void *object); |
32 void gaim_perl_bless_plain(const char *stash, void *object); |
| 30 SV *gaim_perl_bless_object(void *object, const char *stash); |
33 SV *gaim_perl_bless_object(void *object, const char *stash); |