summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-10-11 21:43:44 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-10-11 21:43:44 (GMT)
commitde46d7767eadf5c2cdf992a3abd1413e15662674 (patch)
tree6ec54166e1a86a7d7a558c818ffc68b1a294cad1 /win
parent04ea07263f1075d0b484d36c21726daf94cdd02f (diff)
parentc20fffb1c16d1b8a7ed25de25f292df6297d176f (diff)
downloadtcl-de46d7767eadf5c2cdf992a3abd1413e15662674.zip
tcl-de46d7767eadf5c2cdf992a3abd1413e15662674.tar.gz
tcl-de46d7767eadf5c2cdf992a3abd1413e15662674.tar.bz2
Fix [3cc1d91345]: duplicate calls to TclpFreeAllocCache() on thread exists
Diffstat (limited to 'win')
-rw-r--r--win/tclWinThrd.c6
1 files changed, 4 insertions, 2 deletions
diff --git a/win/tclWinThrd.c b/win/tclWinThrd.c
index ca26f08..8f3ddb9 100644
--- a/win/tclWinThrd.c
+++ b/win/tclWinThrd.c
@@ -1012,8 +1012,10 @@ TclpFreeAllocCache(
if (ptr != NULL) {
/*
- * Called by us in TclpFinalizeThreadData when a thread exits and
- * destroys the tsd key which stores allocator caches.
+ * Called by TclFinalizeThreadAlloc() and
+ * TclFinalizeThreadAllocThread() during Tcl_Finalize() or
+ * Tcl_FinalizeThread(). This function destroys the tsd key which
+ * stores allocator caches in thread local storage.
*/
TclFreeAllocCache(ptr);