Moved #defines for SWIG_malloc, SWIG_ConvertPtr et al. from %runtime
block into runtime file. This fixes the build of the runtime library. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@4912 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
36055df144
commit
30bcf4d0d1
3 changed files with 19 additions and 24 deletions
|
|
@ -1,15 +1,7 @@
|
||||||
%runtime %{
|
/* -*- c -*-
|
||||||
#define SWIG_malloc(size) \
|
This SWIG interface file is processed if the Guile module is run
|
||||||
SCM_MUST_MALLOC(size)
|
with gh_ flavor.
|
||||||
#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)
|
|
||||||
%}
|
|
||||||
|
|
||||||
%runtime "guile_gh_run.swg"
|
%runtime "guile_gh_run.swg"
|
||||||
%include "guile.i"
|
%include "guile.i"
|
||||||
|
|
|
||||||
|
|
@ -15,6 +15,17 @@
|
||||||
extern "C" {
|
extern "C" {
|
||||||
#endif
|
#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)
|
#if defined(SWIG_NOINCLUDE)
|
||||||
# define SWIGSTATIC
|
# define SWIGSTATIC
|
||||||
#elif defined(SWIG_GLOBAL)
|
#elif defined(SWIG_GLOBAL)
|
||||||
|
|
|
||||||
|
|
@ -1,15 +1,7 @@
|
||||||
%runtime %{
|
/* -*- c -*-
|
||||||
#define SWIG_malloc(size) \
|
This SWIG interface file is processed if the Guile module is run
|
||||||
SCM_MUST_MALLOC(size)
|
with SCM_ flavor.
|
||||||
#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)
|
|
||||||
%}
|
|
||||||
|
|
||||||
%runtime "common.swg"
|
%runtime "common.swg"
|
||||||
%runtime "guile_scm_run.swg"
|
%runtime "guile_scm_run.swg"
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue