diff options
author | dgp <dgp@users.sourceforge.net> | 2012-11-29 20:32:16 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2012-11-29 20:32:16 (GMT) |
commit | 874eb36e70b83f2647a22cf1be13640c1ebc5577 (patch) | |
tree | d6c6b72dab51babfeebb2b2e5d5f010d79ee4ec3 /win | |
parent | 74628e76c19dab883bb362fababc98e9029d47e3 (diff) | |
download | tcl-874eb36e70b83f2647a22cf1be13640c1ebc5577.zip tcl-874eb36e70b83f2647a22cf1be13640c1ebc5577.tar.gz tcl-874eb36e70b83f2647a22cf1be13640c1ebc5577.tar.bz2 |
Destroy all the TCL_STORAGE_CLASS and associated nonsense.
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinDde.c | 14 | ||||
-rw-r--r-- | win/tclWinReg.c | 13 |
2 files changed, 4 insertions, 23 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 5cf7d60..9b3872e 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -33,16 +33,6 @@ #endif /* - * TCL_STORAGE_CLASS is set unconditionally to DLLEXPORT because the Dde_Init - * declaration is in the source file itself, which is only accessed when we - * are building a library. DO NOT MOVE BEFORE ANY #include LINES. ONLY USE - * EXTERN TO INDICATE EXPORTED FUNCTIONS FROM NOW ON. - */ - -#undef TCL_STORAGE_CLASS -#define TCL_STORAGE_CLASS DLLEXPORT - -/* * The following structure is used to keep track of the interpreters * registered by this process. */ @@ -134,8 +124,8 @@ static int DdeObjCmd(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); -EXTERN int Dde_Init(Tcl_Interp *interp); -EXTERN int Dde_SafeInit(Tcl_Interp *interp); +DLLEXPORT int Dde_Init(Tcl_Interp *interp); +DLLEXPORT int Dde_SafeInit(Tcl_Interp *interp); /* *---------------------------------------------------------------------- diff --git a/win/tclWinReg.c b/win/tclWinReg.c index dadfa2b..619d9df 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -49,15 +49,6 @@ #endif /* - * TCL_STORAGE_CLASS is set unconditionally to DLLEXPORT because the - * Registry_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 - -/* * The following macros convert between different endian ints. */ @@ -140,8 +131,8 @@ static int SetValue(Tcl_Interp *interp, Tcl_Obj *keyNameObj, Tcl_Obj *valueNameObj, Tcl_Obj *dataObj, Tcl_Obj *typeObj, REGSAM mode); -EXTERN int Registry_Init(Tcl_Interp *interp); -EXTERN int Registry_Unload(Tcl_Interp *interp, int flags); +DLLEXPORT int Registry_Init(Tcl_Interp *interp); +DLLEXPORT int Registry_Unload(Tcl_Interp *interp, int flags); /* *---------------------------------------------------------------------- |