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

Fix static extern C compilation errors for Perl C++ wrappers

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10152 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2007-11-19 21:31:18 +00:00
commit 6ac7bcba31
1 changed files with 5 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

19
Lib/perl5/perlrun.swg
View file

@ -107,21 +107,12 @@ typedef int (CPerlObj::*SwigMagicFunc)(SV *, MAGIC *);
#endif
#define SWIG_MAGIC(a,b) (SV *a, MAGIC *b)
#ifdef __cplusplus
#define SWIGCLASS_STATIC extern "C"
#else
#define SWIGCLASS_STATIC
#endif
#else
#else /* PERL_OBJECT */
#define MAGIC_PPERL
#ifdef __cplusplus
#define SWIGCLASS_STATIC extern "C" static SWIGUNUSED
#else
#define SWIGCLASS_STATIC static SWIGUNUSED
#endif
#ifndef MULTIPLICITY
#define SWIG_MAGIC(a,b) (SV *a, MAGIC *b)
@ -134,8 +125,8 @@ typedef int (*SwigMagicFunc)(SV *, MAGIC *);
}
#endif
#else /* MULTIPLICITY */
#else
#define SWIG_MAGIC(a,b) (struct interpreter *interp, SV *a, MAGIC *b)
#ifdef __cplusplus
@ -146,8 +137,8 @@ typedef int (*SwigMagicFunc)(struct interpreter *, SV *, MAGIC *);
}
#endif
#endif
#endif
#endif /* MULTIPLICITY */
#endif /* PERL_OBJECT */
/* Workaround for bug in perl 5.6.x croak and earlier */
#if (PERL_VERSION < 8)