diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-13 14:43:07 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-13 14:43:07 (GMT) |
| commit | 8c5fe95e9cc4b8115124f0cd9a936f68e7247db1 (patch) | |
| tree | b83b1bb2c4dd8b6bf0965a5c29529fe3bf570762 /generic/tclEvent.c | |
| parent | dcb024402d1a3c73cf744af89c99f82339dc215c (diff) | |
| parent | f15743b10f46d799266a5df68f03a35a22885704 (diff) | |
| download | tcl-8c5fe95e9cc4b8115124f0cd9a936f68e7247db1.zip tcl-8c5fe95e9cc4b8115124f0cd9a936f68e7247db1.tar.gz tcl-8c5fe95e9cc4b8115124f0cd9a936f68e7247db1.tar.bz2 | |
Introduce new function TclInitThreadAlloc(), symmetric with TclFinalizeThreadAlloc()notifier
Diffstat (limited to 'generic/tclEvent.c')
| -rw-r--r-- | generic/tclEvent.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index b0b8188..436db7a 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1043,6 +1043,9 @@ TclInitSubsystems(void) #if USE_TCLALLOC TclInitAlloc(); /* Process wide mutex init */ #endif +#if defined(TCL_THREADS) && defined(USE_THREAD_ALLOC) + TclInitThreadAlloc(); /* Setup thread allocator caches */ +#endif #ifdef TCL_MEM_DEBUG TclInitDbCkalloc(); /* Process wide mutex init */ #endif |