Search
j0ke.net Open Build Service
>
Projects
>
devel
:
tools
:
building
>
swig
> adapt-perl512.diff
Sign Up
|
Log In
Username
Password
Cancel
Overview
Repositories
Revisions
Requests
Users
Advanced
Attributes
Meta
File adapt-perl512.diff of Package swig
Index: swig-1.3.40/Lib/perl5/perlrun.swg =================================================================== --- swig-1.3.40.orig/Lib/perl5/perlrun.swg 2009-08-14 23:05:06.000000000 +0200 +++ swig-1.3.40/Lib/perl5/perlrun.swg 2010-04-06 15:07:29.000000000 +0200 @@ -272,6 +272,7 @@ SWIG_Perl_ConvertPtrAndOwn(SWIG_MAYBE_PE } else if (! SvOK(sv)) { /* Check for undef */ *(ptr) = (void *) 0; return SWIG_OK; +#if PERL_VERSION < 12 } else if (SvTYPE(sv) == SVt_RV) { /* Check for NULL pointer */ if (!SvROK(sv)) { *(ptr) = (void *) 0; @@ -279,6 +280,7 @@ SWIG_Perl_ConvertPtrAndOwn(SWIG_MAYBE_PE } else { return SWIG_ERROR; } +#endif } else { /* Don't know what it is */ return SWIG_ERROR; }
