Home | History | Annotate | Download | only in guile 
      1 /* -*- mode: c -*- */
      2 
      3 %module swigrun
      4 
      5 #ifdef SWIGGUILE_SCM
      6 
      7 /* Hook the runtime module initialization
      8    into the shared initialization function SWIG_Guile_Init. */
      9 %runtime %{
     10 /* Hook the runtime module initialization
     11    into the shared initialization function SWIG_Guile_Init. */
     12 #include <libguile.h>
     13 #ifdef __cplusplus
     14 extern "C"
     15 #endif
     16 SCM scm_init_Swig_swigrun_module (void);
     17 #define SWIG_INIT_RUNTIME_MODULE scm_init_Swig_swigrun_module();
     18 %}
     19 
     20 /* The runtime type system from common.swg */
     21 
     22 typedef struct swig_type_info swig_type_info;
     23 
     24 const char *
     25 SWIG_TypeName(const swig_type_info *type);
     26 
     27 const char *
     28 SWIG_TypePrettyName(const swig_type_info *type);
     29 
     30 swig_type_info *
     31 SWIG_TypeQuery(const char *);
     32 
     33 /* Language-specific stuff */
     34 
     35 %apply bool { int };
     36 
     37 int
     38 SWIG_IsPointer(SCM object);
     39 
     40 int
     41 SWIG_IsPointerOfType(SCM object, swig_type_info *type);
     42 
     43 unsigned long
     44 SWIG_PointerAddress(SCM object);
     45 
     46 swig_type_info *
     47 SWIG_PointerType(SCM object);
     48 
     49 #endif
     50