comparison: libpurple/plugins/perl/perl-handlers.c
libpurple/plugins/perl/perl-handlers.c
- branch
- release-2.4.3
- changeset 23182
- e32645a28cad
- parent 22845
- 7ccb529edf3f
- child 23930
- c1c3d7cab338
equal
deleted
inserted
replaced
| 23181:d05abf92a22a | 23182:e32645a28cad |
|---|---|
| 381 break; | 381 break; |
| 382 | 382 |
| 383 case PURPLE_TYPE_BOXED: | 383 case PURPLE_TYPE_BOXED: |
| 384 *((void **)copy_args[i]) = (void *)SvIV(sv_args[i]); | 384 *((void **)copy_args[i]) = (void *)SvIV(sv_args[i]); |
| 385 break; | 385 break; |
| 386 case PURPLE_TYPE_SUBTYPE: | |
| 387 *((void **)copy_args[i]) = purple_perl_ref_object(sv_args[i]); | |
| 388 break; | |
| 386 | 389 |
| 387 default: | 390 default: |
| 388 break; | 391 break; |
| 389 } | 392 } |
| 390 | 393 |
