fix cygwin warning for perl
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8520 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
5135023008
commit
bd11299e1e
2 changed files with 8 additions and 1 deletions
|
|
@ -232,7 +232,7 @@ SWIG_Perl_ConvertPtr(SWIG_MAYBE_PERL_OBJECT SV *sv, void **ptr, swig_type_info *
|
||||||
} else {
|
} else {
|
||||||
tmp = SvIV(tsv);
|
tmp = SvIV(tsv);
|
||||||
}
|
}
|
||||||
voidptr = (void *)tmp;
|
voidptr = (void *)(SWIGINTPTR)tmp;
|
||||||
} else if (! SvOK(sv)) { /* Check for undef */
|
} else if (! SvOK(sv)) { /* Check for undef */
|
||||||
*(ptr) = (void *) 0;
|
*(ptr) = (void *) 0;
|
||||||
return SWIG_OK;
|
return SWIG_OK;
|
||||||
|
|
|
||||||
|
|
@ -82,3 +82,10 @@
|
||||||
# endif
|
# endif
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
|
||||||
|
#if defined(_MSC_VER)
|
||||||
|
# define SWIGINTPTR long
|
||||||
|
#else
|
||||||
|
# include <inttypes.h>
|
||||||
|
# define SWIGINTPTR intptr_t
|
||||||
|
#endif
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue