diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-10-11 21:52:57 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-10-11 21:52:57 (GMT) |
commit | 1ad6b91e705f65b9d156c10aa41c4a88e6686877 (patch) | |
tree | 4a830dcdd04884ee7552dabfd033c6428ec70f0f /win/tclWinThrd.c | |
parent | 012c80fc04ac184c1e045362d3cf6c3a6366d05e (diff) | |
parent | de46d7767eadf5c2cdf992a3abd1413e15662674 (diff) | |
download | tcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.zip tcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.tar.gz tcl-1ad6b91e705f65b9d156c10aa41c4a88e6686877.tar.bz2 |
Fix [3cc1d91345]: duplicate calls to TclpFreeAllocCache() on thread exists
Diffstat (limited to 'win/tclWinThrd.c')
-rw-r--r-- | win/tclWinThrd.c | 6 |
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); |