summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-10-11 21:52:57 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-10-11 21:52:57 (GMT)
commit1ad6b91e705f65b9d156c10aa41c4a88e6686877 (patch)
tree4a830dcdd04884ee7552dabfd033c6428ec70f0f /win
parent012c80fc04ac184c1e045362d3cf6c3a6366d05e (diff)
parentde46d7767eadf5c2cdf992a3abd1413e15662674 (diff)
downloadtcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.zip
tcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.tar.gz
tcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.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 26d745d..e46b0a0 100644
--- a/win/tclWinThrd.c
+++ b/win/tclWinThrd.c
@@ -1008,8 +1008,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);