summaryrefslogtreecommitdiffstats
path: root/generic/tclThreadStorage.c
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclThreadStorage.c')
-rw-r--r--generic/tclThreadStorage.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclThreadStorage.c b/generic/tclThreadStorage.c
index 949b7a3..33db5a2 100644
--- a/generic/tclThreadStorage.c
+++ b/generic/tclThreadStorage.c
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclThreadStorage.c,v 1.9 2005/11/27 02:33:49 das Exp $
+ * RCS: @(#) $Id: tclThreadStorage.c,v 1.10 2006/11/07 14:26:26 dkf Exp $
*/
#include "tclInt.h"
@@ -135,7 +135,7 @@ AllocThreadStorageEntry(
Tcl_HashEntry *hPtr;
hPtr = (Tcl_HashEntry *) TclpSysAlloc(sizeof(Tcl_HashEntry), 0);
- hPtr->key.oneWordValue = (char *)keyPtr;
+ hPtr->key.oneWordValue = keyPtr;
return hPtr;
}
@@ -299,7 +299,7 @@ TclInitThreadStorage(void)
* We also initialize the cache.
*/
- memset((ThreadStorage *)&threadStorageCache, 0,
+ memset(&threadStorageCache, 0,
sizeof(ThreadStorage) * STORAGE_CACHE_SLOTS);
/*
@@ -338,7 +338,7 @@ TclpThreadDataKeyGet(
if (hPtr == NULL) {
return NULL;
}
- return (void *) Tcl_GetHashValue(hPtr);
+ return Tcl_GetHashValue(hPtr);
}
/*
@@ -529,7 +529,7 @@ TclFinalizeThreadStorage(void)
* Clear out the thread storage cache as well.
*/
- memset((ThreadStorage *)&threadStorageCache, 0,
+ memset(&threadStorageCache, 0,
sizeof(ThreadStorage) * STORAGE_CACHE_SLOTS);
/*