comparison: plugins/perl/perl-common.h
plugins/perl/perl-common.h
- changeset 12871
- 3584d93ae63c
- parent 12497
- a17568773be3
- child 12872
- b3d38f1b9bd7
equal
deleted
inserted
replaced
| 12870:20dd598144a9 | 12871:3584d93ae63c |
|---|---|
| 23 #define GAIM_PERL_BOOT(x) \ | 23 #define GAIM_PERL_BOOT(x) \ |
| 24 gaim_perl_callXS(boot_Gaim__##x, cv, mark) | 24 gaim_perl_callXS(boot_Gaim__##x, cv, mark) |
| 25 | 25 |
| 26 void gaim_perl_normalize_script_name(char *name); | 26 void gaim_perl_normalize_script_name(char *name); |
| 27 | 27 |
| 28 | |
| 29 SV *newSVGChar(const char *str); | 28 SV *newSVGChar(const char *str); |
| 30 | 29 |
| 31 void gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark); | 30 void gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark); |
| 32 void gaim_perl_bless_plain(const char *stash, void *object); | 31 void gaim_perl_bless_plain(const char *stash, void *object); |
| 33 SV *gaim_perl_bless_object(void *object, const char *stash); | 32 SV *gaim_perl_bless_object(void *object, const char *stash); |
| 41 SV *gaim_perl_sv_from_value(const GaimValue *value); | 40 SV *gaim_perl_sv_from_value(const GaimValue *value); |
| 42 #endif | 41 #endif |
| 43 | 42 |
| 44 void *gaim_perl_data_from_sv(GaimValue *value, SV *sv); | 43 void *gaim_perl_data_from_sv(GaimValue *value, SV *sv); |
| 45 SV *gaim_perl_sv_from_vargs(const GaimValue *value, va_list *args, | 44 SV *gaim_perl_sv_from_vargs(const GaimValue *value, va_list *args, |
| 46 void ***copy_arg); | 45 void ***copy_arg); |
| 47 | 46 |
| 48 #endif /* _GAIM_PERL_COMMON_H_ */ | 47 #endif /* _GAIM_PERL_COMMON_H_ */ |
