diff options
| -rw-r--r-- | generic/tclCompile.h | 11 | ||||
| -rw-r--r-- | generic/tclInt.h | 10 |
2 files changed, 18 insertions, 3 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 5d42ce7..b1e700d 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -6,7 +6,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: %Z% $Id: tclCompile.h,v 1.5 1998/07/28 09:08:40 escoffon Exp $ + * SCCS: %Z% $Id: tclCompile.h,v 1.6 1998/07/29 13:25:58 escoffon Exp $ */ #ifndef _TCLCOMPILATION @@ -16,6 +16,11 @@ #include "tclInt.h" #endif /* _TCLINT */ +#ifdef BUILD_tcl +# undef EXPORT +# define EXPORT DLLEXPORT +#endif + /* *------------------------------------------------------------------------ * Variables related to compilation. These are used in tclCompile.c, @@ -1043,5 +1048,7 @@ EXTERN void TclRegisterAuxDataType _ANSI_ARGS_((AuxDataType *typePtr)); #define MAX_JUMP_DIST 5000 -#endif /* _TCLCOMPILATION */ +#undef EXPORT +#define EXPORT DLLIMPORT +#endif /* _TCLCOMPILATION */ diff --git a/generic/tclInt.h b/generic/tclInt.h index 346a8d8..dc9ae2f 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: %Z% $Id: tclInt.h,v 1.12 1998/07/29 13:12:12 escoffon Exp $ + * SCCS: %Z% $Id: tclInt.h,v 1.13 1998/07/29 13:26:06 escoffon Exp $ */ #ifndef _TCLINT @@ -57,6 +57,11 @@ # include <varargs.h> #endif +#ifdef BUILD_tcl +# undef EXPORT +# define EXPORT DLLEXPORT +#endif + /* * The following procedures allow namespaces to be customized to * support special name resolution rules for commands/variables. @@ -2092,5 +2097,8 @@ EXTERN void Tcl_SetNamespaceResolvers _ANSI_ARGS_(( Tcl_ResolveVarProc *varProc, Tcl_ResolveCompiledVarProc *compiledVarProc)); +#undef EXPORT +#define EXPORT DLLIMPORT + #endif /* _TCLINT */ |