/tags/rel-1-3-27/SWIG/Lib/guile/swigrun.i
Swig | 49 lines | 27 code | 15 blank | 7 comment | 0 complexity | b01078f02c6ac64f19db543a1296506c MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
- /* -*- mode: c -*- */
- %module swigrun
- #ifdef SWIGGUILE_SCM
- /* Hook the runtime module initialization
- into the shared initialization function SWIG_Guile_Init. */
- %runtime %{
- /* Hook the runtime module initialization
- into the shared initialization function SWIG_Guile_Init. */
- #include <libguile.h>
- #ifdef __cplusplus
- extern "C"
- #endif
- SCM scm_init_Swig_swigrun_module (void);
- #define SWIG_INIT_RUNTIME_MODULE scm_init_Swig_swigrun_module();
- %}
- /* The runtime type system from common.swg */
- typedef struct swig_type_info swig_type_info;
- const char *
- SWIG_TypeName(const swig_type_info *type);
- const char *
- SWIG_TypePrettyName(const swig_type_info *type);
- swig_type_info *
- SWIG_TypeQuery(const char *);
- /* Language-specific stuff */
- %apply bool { int };
- int
- SWIG_IsPointer(SCM object);
- int
- SWIG_IsPointerOfType(SCM object, swig_type_info *type);
- unsigned long
- SWIG_PointerAddress(SCM object);
- swig_type_info *
- SWIG_PointerType(SCM object);
- #endif