comparison: plugins/perl/perl-common.c
plugins/perl/perl-common.c
- changeset 6531
- 3fca41d7b411
- parent 6520
- 5386692555c9
- child 6566
- 61eb35202526
equal
deleted
inserted
replaced
| 6530:123bf2500cc1 | 6531:3fca41d7b411 |
|---|---|
| 37 SV * | 37 SV * |
| 38 gaim_perl_bless_object(void *object, const char *stash_name) | 38 gaim_perl_bless_object(void *object, const char *stash_name) |
| 39 { | 39 { |
| 40 HV *stash; | 40 HV *stash; |
| 41 HV *hv; | 41 HV *hv; |
| 42 void *hash; | |
| 43 | 42 |
| 44 if (object_stashes == NULL) | 43 if (object_stashes == NULL) |
| 45 { | 44 { |
| 46 object_stashes = g_hash_table_new(g_direct_hash, g_direct_equal); | 45 object_stashes = g_hash_table_new(g_direct_hash, g_direct_equal); |
| 47 } | 46 } |
