better solution for warning of perl+cygwin
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8521 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
bd11299e1e
commit
5bbeb3847a
2 changed files with 1 additions and 9 deletions
|
|
@ -232,7 +232,7 @@ SWIG_Perl_ConvertPtr(SWIG_MAYBE_PERL_OBJECT SV *sv, void **ptr, swig_type_info *
|
|||
} else {
|
||||
tmp = SvIV(tsv);
|
||||
}
|
||||
voidptr = (void *)(SWIGINTPTR)tmp;
|
||||
voidptr = INT2PTR(void *,tmp);
|
||||
} else if (! SvOK(sv)) { /* Check for undef */
|
||||
*(ptr) = (void *) 0;
|
||||
return SWIG_OK;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue