diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2003-10-10 15:50:35 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2003-10-10 15:50:35 (GMT) |
| commit | cea8ddaa76c5481a3d6b897d651bd0ae03ec7322 (patch) | |
| tree | cf1109d1c5fe0a2d0670db6854c4820c345d9821 /generic/tclIOUtil.c | |
| parent | e7ee62989ba32781bf9225e6e5e4d1d3800535c0 (diff) | |
| download | tcl-cea8ddaa76c5481a3d6b897d651bd0ae03ec7322.zip tcl-cea8ddaa76c5481a3d6b897d651bd0ae03ec7322.tar.gz tcl-cea8ddaa76c5481a3d6b897d651bd0ae03ec7322.tar.bz2 | |
Exported symbol name police (thanks GPS for spotting this!)
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index e5b3766..43f68e0 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -17,7 +17,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIOUtil.c,v 1.84 2003/09/29 22:38:20 dkf Exp $ + * RCS: @(#) $Id: tclIOUtil.c,v 1.85 2003/10/10 15:50:35 dkf Exp $ */ #include "tclInt.h" @@ -396,7 +396,7 @@ static FilesystemRecord nativeFilesystemRecord = { * For multithreading builds, change of the filesystem epoch * will trigger cache cleanup in all threads. */ -int theFilesystemEpoch = 0; +static int theFilesystemEpoch = 0; /* * Stores the linked list of filesystems. A 1:1 copy of this @@ -413,7 +413,7 @@ static Tcl_Obj* cwdPathPtr = NULL; static int cwdPathEpoch = 0; TCL_DECLARE_MUTEX(cwdMutex) -Tcl_ThreadDataKey fsDataKey; +Tcl_ThreadDataKey tclFsDataKey; /* * Declare fallback support function and @@ -465,7 +465,7 @@ int TclFSCwdPointerEquals(objPtr) Tcl_Obj* objPtr; { - ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); + ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); Tcl_MutexLock(&cwdMutex); if (tsdPtr->cwdPathPtr == NULL @@ -495,7 +495,7 @@ TclFSCwdPointerEquals(objPtr) static void FsRecacheFilesystemList(void) { - ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); + ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); FilesystemRecord *fsRecPtr, *tmpFsRecPtr; /* Trash the current cache */ @@ -546,7 +546,7 @@ FsRecacheFilesystemList(void) static FilesystemRecord * FsGetFirstFilesystem(void) { - ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); + ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); FilesystemRecord *fsRecPtr; #ifndef TCL_THREADS tsdPtr->filesystemEpoch = theFilesystemEpoch; @@ -570,7 +570,7 @@ FsUpdateCwd(cwdObj) { int len; char *str = NULL; - ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); + ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); if (cwdObj != NULL) { str = Tcl_GetStringFromObj(cwdObj, &len); @@ -2175,7 +2175,7 @@ Tcl_Obj* Tcl_FSGetCwd(interp) Tcl_Interp *interp; { - ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&fsDataKey); + ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&tclFsDataKey); if (TclFSCwdPointerEquals(NULL)) { FilesystemRecord *fsRecPtr; |