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

Changed _swig_type_info to swig_type_info

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@799 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2000-09-02 16:25:50 +00:00
commit 3ef3086b5a
20 changed files with 201 additions and 209 deletions
Download patch file Download diff file Expand all files Collapse all files

8
SWIG/Lib/guile/guile.swg
View file

@ -180,7 +180,7 @@ SWIG_Cast (void *source, size_t source_type,
static unsigned long swig_tag = 0;
SWIGSTATIC SCM
SWIG_Guile_MakePtr (void *ptr, _swig_type_info *type)
SWIG_Guile_MakePtr (void *ptr, swig_type_info *type)
{
if (ptr==NULL) return SCM_EOL;
SCM_RETURN_NEWSMOB((((unsigned long)type->tag << 16) | swig_tag),
@ -189,7 +189,7 @@ SWIG_Guile_MakePtr (void *ptr, _swig_type_info *type)
/* Return 0 if successful. */
SWIGSTATIC int
SWIG_Guile_GetPtr(SCM s, void **result, _swig_type_info *type)
SWIG_Guile_GetPtr(SCM s, void **result, swig_type_info *type)
{
if (SCM_NULLP(s)) {
*result = NULL;
@ -246,10 +246,10 @@ SWIG_Guile_Init (void)
/* Convert datatype table */
SWIGSTATIC
void SWIG_Guile_RegisterTypes(_swig_type_info **table)
void SWIG_Guile_RegisterTypes(swig_type_info **table)
{
for (; *table; table++) {
_swig_type_info *type = *table;
swig_type_info *type = *table;
char *origname = type->name;
/* Register datatype itself and store pointer back */
type->tag = SWIG_RegisterType(origname, type->str);

12
SWIG/Lib/guile/guiledec.swg
View file

@ -54,17 +54,17 @@ GSWIG_scm2char (SCM s)
typedef struct SwigPtrType SwigPtrType;
typedef struct _swig_type_info {
typedef struct swig_type_info {
char *name;
void *(*converter)(void *);
char *str;
size_t tag;
} _swig_type_info;
} swig_type_info;
#define _swig_types_initial _swig_types
#define swig_types_initial swig_types
SWIGSTATIC void
SWIG_Guile_RegisterTypes (_swig_type_info **table);
SWIG_Guile_RegisterTypes (swig_type_info **table);
/* Register a new type-mapping with the type-checker. origtype is the
original datatype and newtype is an equivalent type. cast is optional
@ -87,11 +87,11 @@ SWIG_Guile_Init();
/* Get a pointer value from a smob. If there is a type-mismatch,
return nonzero; on success, return 0. */
SWIGSTATIC int
SWIG_Guile_GetPtr (SCM s, void **result, _swig_type_info *type);
SWIG_Guile_GetPtr (SCM s, void **result, swig_type_info *type);
/* Make a smob from a pointer and typeinfo. */
SWIGSTATIC SCM
SWIG_Guile_MakePtr (void *ptr, _swig_type_info *type);
SWIG_Guile_MakePtr (void *ptr, swig_type_info *type);
/* Get arguments from an argument list */
SWIGSTATIC void