diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-29 15:28:36 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-29 15:28:36 (GMT) |
| commit | bbccbfba7b9080ce0a137da9100b3ee550cdea41 (patch) | |
| tree | 45c99d49da58a2bc779003cada3433f80398197e /unix/dltest/pkgua.c | |
| parent | b2522c9c24b283a616ac38c4c987827c4fa86167 (diff) | |
| download | tcl-bbccbfba7b9080ce0a137da9100b3ee550cdea41.zip tcl-bbccbfba7b9080ce0a137da9100b3ee550cdea41.tar.gz tcl-bbccbfba7b9080ce0a137da9100b3ee550cdea41.tar.bz2 | |
Eliminate internal use of TCL_STORAGE_CLASS, as it will be gone in 9.0 anyway
Diffstat (limited to 'unix/dltest/pkgua.c')
| -rw-r--r-- | unix/dltest/pkgua.c | 16 |
1 files changed, 4 insertions, 12 deletions
diff --git a/unix/dltest/pkgua.c b/unix/dltest/pkgua.c index 5de0101..6d95640 100644 --- a/unix/dltest/pkgua.c +++ b/unix/dltest/pkgua.c @@ -15,14 +15,6 @@ #include "tcl.h" /* - * TCL_STORAGE_CLASS is set unconditionally to DLLEXPORT because the - * Pkgua_Init declaration is in the source file itself, which is only - * accessed when we are building a library. - */ -#undef TCL_STORAGE_CLASS -#define TCL_STORAGE_CLASS DLLEXPORT - -/* * Prototypes for procedures defined later in this file: */ @@ -200,7 +192,7 @@ PkguaQuoteObjCmd( *---------------------------------------------------------------------- */ -EXTERN int +DLLEXPORT int Pkgua_Init( Tcl_Interp *interp) /* Interpreter in which the package is to be * made available. */ @@ -253,7 +245,7 @@ Pkgua_Init( *---------------------------------------------------------------------- */ -EXTERN int +DLLEXPORT int Pkgua_SafeInit( Tcl_Interp *interp) /* Interpreter in which the package is to be * made available. */ @@ -278,7 +270,7 @@ Pkgua_SafeInit( *---------------------------------------------------------------------- */ -EXTERN int +DLLEXPORT int Pkgua_Unload( Tcl_Interp *interp, /* Interpreter from which the package is to be * unloaded. */ @@ -331,7 +323,7 @@ Pkgua_Unload( *---------------------------------------------------------------------- */ -EXTERN int +DLLEXPORT int Pkgua_SafeUnload( Tcl_Interp *interp, /* Interpreter from which the package is to be * unloaded. */ |