diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-06-12 18:02:24 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-06-12 18:02:24 (GMT) |
| commit | a54459bed607a9d65134f2d5b535e29f75c0d252 (patch) | |
| tree | 35ebae2d63bc07792e3d361d8ac718fe69a22492 /generic/tclBasic.c | |
| parent | 7fe9e1b90c4464f3f288cecc3fa1d65bb6904cd1 (diff) | |
| parent | f2ec60553a7e3f8cc433362a672fa9eea014b332 (diff) | |
| download | tcl-a54459bed607a9d65134f2d5b535e29f75c0d252.zip tcl-a54459bed607a9d65134f2d5b535e29f75c0d252.tar.gz tcl-a54459bed607a9d65134f2d5b535e29f75c0d252.tar.bz2 | |
close fork
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 2ebed06..9c2736c 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -749,7 +749,7 @@ Tcl_CreateInterp(void) * cache was already initialised by the call to alloc the interp struct. */ -#if defined(TCL_THREADS) && defined(USE_THREAD_ALLOC) +#if TCL_THREADS && defined(USE_THREAD_ALLOC) iPtr->allocCache = TclpGetAllocCache(); #else iPtr->allocCache = NULL; @@ -964,7 +964,7 @@ Tcl_CreateInterp(void) #endif /* !TCL_NO_DEPRECATED */ TclpSetVariables(interp); -#ifdef TCL_THREADS +#if TCL_THREADS /* * The existence of the "threaded" element of the tcl_platform array * indicates that this particular Tcl shell has been compiled with threads |