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

Cygwin gcc now uses __declspec(dllexport) for creating exported functions in the runtime library DLLs

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@5413 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2003-11-25 21:53:02 +00:00
commit f3cc31dec9
1 changed files with 38 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

81
Lib/common.swg
View file

@ -15,33 +15,33 @@
#include <string.h> #include <string.h>
#if defined(_WIN32) || defined(__WIN32__) #if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
# if defined(_MSC_VER) # if defined(_MSC_VER) || defined(__GNUC__)
# if defined(STATIC_LINKED) # if defined(STATIC_LINKED)
# define SWIGEXPORT(a) a # define SWIGEXPORT(a) a
# define SWIGIMPORT(a) extern a # define SWIGIMPORT(a) extern a
# else # else
# define SWIGEXPORT(a) __declspec(dllexport) a # define SWIGEXPORT(a) __declspec(dllexport) a
# define SWIGIMPORT(a) extern a # define SWIGIMPORT(a) extern a
# endif # endif
# else # else
# if defined(__BORLANDC__) # if defined(__BORLANDC__)
# define SWIGEXPORT(a) a _export # define SWIGEXPORT(a) a _export
# define SWIGIMPORT(a) a _export # define SWIGIMPORT(a) a _export
# else # else
# define SWIGEXPORT(a) a # define SWIGEXPORT(a) a
# define SWIGIMPORT(a) a # define SWIGIMPORT(a) a
# endif # endif
# endif # endif
#else #else
# define SWIGEXPORT(a) a # define SWIGEXPORT(a) a
# define SWIGIMPORT(a) a # define SWIGIMPORT(a) a
#endif #endif
#ifdef SWIG_GLOBAL #ifdef SWIG_GLOBAL
#define SWIGRUNTIME(a) SWIGEXPORT(a) # define SWIGRUNTIME(a) SWIGEXPORT(a)
#else #else
#define SWIGRUNTIME(a) static a # define SWIGRUNTIME(a) static a
#endif #endif
#ifdef __cplusplus #ifdef __cplusplus
@ -52,10 +52,10 @@ typedef void *(*swig_converter_func)(void *);
typedef struct swig_type_info *(*swig_dycast_func)(void **); typedef struct swig_type_info *(*swig_dycast_func)(void **);
typedef struct swig_type_info { typedef struct swig_type_info {
const char *name; const char *name;
swig_converter_func converter; swig_converter_func converter;
const char *str; const char *str;
void *clientdata; void *clientdata;
swig_dycast_func dcast; swig_dycast_func dcast;
struct swig_type_info *next; struct swig_type_info *next;
struct swig_type_info *prev; struct swig_type_info *prev;
@ -77,15 +77,14 @@ static swig_type_info *swig_type_list = 0;
/* Register a type mapping with the type-checking */ /* Register a type mapping with the type-checking */
SWIGRUNTIME(swig_type_info *) SWIGRUNTIME(swig_type_info *)
SWIG_TypeRegister(swig_type_info *ti) SWIG_TypeRegister(swig_type_info *ti) {
{
swig_type_info *tc, *head, *ret, *next; swig_type_info *tc, *head, *ret, *next;
/* Check to see if this type has already been registered */ /* Check to see if this type has already been registered */
tc = swig_type_list; tc = swig_type_list;
while (tc) { while (tc) {
if (strcmp(tc->name, ti->name) == 0) { if (strcmp(tc->name, ti->name) == 0) {
/* Already exists in the table. Just add additional types to the list */ /* Already exists in the table. Just add additional types to the list */
if (tc->clientdata) ti->clientdata = tc->clientdata; if (tc->clientdata) ti->clientdata = tc->clientdata;
head = tc; head = tc;
next = tc->next; next = tc->next;
goto l1; goto l1;
@ -100,7 +99,7 @@ SWIG_TypeRegister(swig_type_info *ti)
swig_type_list = ti; swig_type_list = ti;
/* Build linked lists */ /* Build linked lists */
l1: l1:
ret = head; ret = head;
tc = ti + 1; tc = ti + 1;
/* Patch up the rest of the links */ /* Patch up the rest of the links */
@ -110,15 +109,14 @@ SWIG_TypeRegister(swig_type_info *ti)
head = tc; head = tc;
tc++; tc++;
} }
if (next) next->prev = head; /**/ if (next) next->prev = head;
head->next = next; head->next = next;
return ret; return ret;
} }
/* Check the typename */ /* Check the typename */
SWIGRUNTIME(swig_type_info *) SWIGRUNTIME(swig_type_info *)
SWIG_TypeCheck(char *c, swig_type_info *ty) SWIG_TypeCheck(char *c, swig_type_info *ty) {
{
swig_type_info *s; swig_type_info *s;
if (!ty) return 0; /* Void pointer */ if (!ty) return 0; /* Void pointer */
s = ty->next; /* First element always just a name */ s = ty->next; /* First element always just a name */
@ -128,13 +126,13 @@ SWIG_TypeCheck(char *c, swig_type_info *ty)
/* Move s to the top of the linked list */ /* Move s to the top of the linked list */
s->prev->next = s->next; s->prev->next = s->next;
if (s->next) { if (s->next) {
s->next->prev = s->prev; s->next->prev = s->prev;
} }
/* Insert s as second element in the list */ /* Insert s as second element in the list */
s->next = ty->next; s->next = ty->next;
if (ty->next) ty->next->prev = s; if (ty->next) ty->next->prev = s;
ty->next = s; ty->next = s;
s->prev = ty; /**/ s->prev = ty;
return s; return s;
} }
s = s->next; s = s->next;
@ -144,21 +142,19 @@ SWIG_TypeCheck(char *c, swig_type_info *ty)
/* Cast a pointer up an inheritance hierarchy */ /* Cast a pointer up an inheritance hierarchy */
SWIGRUNTIME(void *) SWIGRUNTIME(void *)
SWIG_TypeCast(swig_type_info *ty, void *ptr) SWIG_TypeCast(swig_type_info *ty, void *ptr) {
{
if ((!ty) || (!ty->converter)) return ptr; if ((!ty) || (!ty->converter)) return ptr;
return (*ty->converter)(ptr); return (*ty->converter)(ptr);
} }
/* Dynamic pointer casting. Down an inheritance hierarchy */ /* Dynamic pointer casting. Down an inheritance hierarchy */
SWIGRUNTIME(swig_type_info *) SWIGRUNTIME(swig_type_info *)
SWIG_TypeDynamicCast(swig_type_info *ty, void **ptr) SWIG_TypeDynamicCast(swig_type_info *ty, void **ptr) {
{
swig_type_info *lastty = ty; swig_type_info *lastty = ty;
if (!ty || !ty->dcast) return ty; if (!ty || !ty->dcast) return ty;
while (ty && (ty->dcast)) { while (ty && (ty->dcast)) {
ty = (*ty->dcast)(ptr); ty = (*ty->dcast)(ptr);
if (ty) lastty = ty; if (ty) lastty = ty;
} }
return lastty; return lastty;
} }
@ -192,9 +188,9 @@ SWIG_TypeClientData(swig_type_info *ti, void *clientdata) {
if (!equiv->converter) { if (!equiv->converter) {
tc = swig_type_list; tc = swig_type_list;
while (tc) { while (tc) {
if ((strcmp(tc->name, equiv->name) == 0)) if ((strcmp(tc->name, equiv->name) == 0))
SWIG_TypeClientData(tc,clientdata); SWIG_TypeClientData(tc,clientdata);
tc = tc->prev; tc = tc->prev;
} }
} }
equiv = equiv->next; equiv = equiv->next;
@ -204,5 +200,4 @@ SWIG_TypeClientData(swig_type_info *ti, void *clientdata) {
#ifdef __cplusplus #ifdef __cplusplus
} }
#endif #endif