diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-04-01 11:56:42 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-04-01 11:56:42 (GMT) |
commit | 2efac8287052129530eb33f10f980d5d67854789 (patch) | |
tree | 079430858ed10ec1e08f8a39ece583e7ecff8c7d /generic | |
parent | 77ccaefbb1482145de9b9276979318e88b9e542e (diff) | |
parent | df008ca3249de1390d881ced2ec3a0b95425d203 (diff) | |
download | tcl-2efac8287052129530eb33f10f980d5d67854789.zip tcl-2efac8287052129530eb33f10f980d5d67854789.tar.gz tcl-2efac8287052129530eb33f10f980d5d67854789.tar.bz2 |
Two micro-optimizations in Win and UNIX notifier. See: [http://code.activestate.com/lists/tcl-core/15645/]
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclEvent.c | 3 | ||||
-rw-r--r-- | generic/tclInt.h | 1 |
2 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 8305410..a16a3b1 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) + TclpInitAllocCache(); +#endif #ifdef TCL_MEM_DEBUG TclInitDbCkalloc(); /* Process wide mutex init */ #endif diff --git a/generic/tclInt.h b/generic/tclInt.h index 42c13dd..34430c8 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4084,6 +4084,7 @@ MODULE_SCOPE void TclFreeAllocCache(void *); MODULE_SCOPE void * TclpGetAllocCache(void); MODULE_SCOPE void TclpSetAllocCache(void *); MODULE_SCOPE void TclpFreeAllocMutex(Tcl_Mutex *mutex); +MODULE_SCOPE void TclpInitAllocCache(void); MODULE_SCOPE void TclpFreeAllocCache(void *); /* |