jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix perl C errors

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8481 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2006-01-19 04:53:15 +00:00
commit 6cb4870883
2 changed files with 4 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

2
SWIG/Lib/perl5/perlrun.swg
View file

@ -209,8 +209,8 @@ SWIG_Perl_ConvertPtr(SWIG_MAYBE_PERL_OBJECT SV *sv, void **ptr, swig_type_info *
/* Check to see if this is an object */
if (sv_isobject(sv)) {
tsv = (SV*) SvRV(sv);
IV tmp = 0;
tsv = (SV*) SvRV(sv);
if ((SvTYPE(tsv) == SVt_PVHV)) {
MAGIC *mg;
if (SvMAGICAL(tsv)) {