Mercurial > pidgin.yaz
diff plugins/perl/perl-common.c @ 7386:414c701ef1ff
[gaim-migrate @ 7981]
Code cleanup to get rid of all warnings for AMD64 from augustus at linuxhardware dot org
committer: Tailor Script <tailor@pidgin.im>
| author | Luke Schierer <lschiere@pidgin.im> |
|---|---|
| date | Thu, 30 Oct 2003 22:27:36 +0000 |
| parents | d3a7ff6a91bb |
| children | ba075b939aa6 |
line wrap: on
line diff
--- a/plugins/perl/perl-common.c Thu Oct 30 21:55:29 2003 +0000 +++ b/plugins/perl/perl-common.c Thu Oct 30 22:27:36 2003 +0000 @@ -499,19 +499,19 @@ return gaim_perl_sv_from_subtype(value, *copy_arg); case GAIM_TYPE_BOOLEAN: - *copy_arg = (void *)va_arg(*args, gboolean); + *copy_arg = GINT_TO_POINTER( va_arg(*args, gboolean) ); - return newSViv((gboolean)*copy_arg); + return newSViv((gboolean)GPOINTER_TO_INT(*copy_arg)); case GAIM_TYPE_INT: - *copy_arg = (void *)va_arg(*args, int); + *copy_arg = GINT_TO_POINTER( va_arg(*args, int) ); - return newSViv((int)*copy_arg); + return newSViv(GPOINTER_TO_INT(*copy_arg)); case GAIM_TYPE_UINT: - *copy_arg = (void *)va_arg(*args, unsigned int); + *copy_arg = GUINT_TO_POINTER(va_arg(*args, unsigned int)); - return newSVuv((unsigned int)*copy_arg); + return newSVuv(GPOINTER_TO_UINT(*copy_arg)); case GAIM_TYPE_LONG: *copy_arg = (void *)va_arg(*args, long);