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

Moved #defines for SWIG_malloc, SWIG_ConvertPtr et al. from %runtime

Browse source 
block into runtime file.
This fixes the build of the runtime library.


git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@4912 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Matthias Köppe 2003-06-18 13:16:23 +00:00
commit 599cf52a50
3 changed files with 19 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

16
SWIG/Lib/guile/guile_gh.swg
View file

@ -1,15 +1,7 @@
%runtime %{
#define SWIG_malloc(size) \
SCM_MUST_MALLOC(size)
#define SWIG_free(mem) \
scm_must_free(mem)
#define SWIG_ConvertPtr(s, result, type, flags) \
SWIG_Guile_GetPtr(s, result, type)
#define SWIG_MustGetPtr(s, type, argnum, flags) \
SWIG_Guile_MustGetPtr(s, type, argnum, FUNC_NAME)
#define SWIG_NewPointerObj(ptr, type, owner) \
SWIG_Guile_MakePtr((void*)ptr, type)
%}
/* -*- c -*-
This SWIG interface file is processed if the Guile module is run
with gh_ flavor.
*/
%runtime "guile_gh_run.swg"
%include "guile.i"

11
SWIG/Lib/guile/guile_gh_run.swg
View file

@ -15,6 +15,17 @@
extern "C" {
#endif
#define SWIG_malloc(size) \
SCM_MUST_MALLOC(size)
#define SWIG_free(mem) \
scm_must_free(mem)
#define SWIG_ConvertPtr(s, result, type, flags) \
SWIG_Guile_GetPtr(s, result, type)
#define SWIG_MustGetPtr(s, type, argnum, flags) \
SWIG_Guile_MustGetPtr(s, type, argnum, FUNC_NAME)
#define SWIG_NewPointerObj(ptr, type, owner) \
SWIG_Guile_MakePtr((void*)ptr, type)
#if defined(SWIG_NOINCLUDE)
# define SWIGSTATIC
#elif defined(SWIG_GLOBAL)

16
SWIG/Lib/guile/guile_scm.swg
View file

@ -1,15 +1,7 @@
%runtime %{
#define SWIG_malloc(size) \
SCM_MUST_MALLOC(size)
#define SWIG_free(mem) \
scm_must_free(mem)
#define SWIG_ConvertPtr(s, result, type, flags) \
SWIG_Guile_ConvertPtr(s, result, type, flags)
#define SWIG_MustGetPtr(s, type, argnum, flags) \
SWIG_Guile_MustGetPtr(s, type, argnum, flags, FUNC_NAME)
#define SWIG_NewPointerObj(ptr, type, owner) \
SWIG_Guile_NewPointerObj((void*)ptr, type, owner)
%}
/* -*- c -*-
This SWIG interface file is processed if the Guile module is run
with SCM_ flavor.
*/
%runtime "common.swg"
%runtime "guile_scm_run.swg"