diff options
author | Miguel Sofer <miguel.sofer@gmail.com> | 2002-07-24 15:40:42 (GMT) |
---|---|---|
committer | Miguel Sofer <miguel.sofer@gmail.com> | 2002-07-24 15:40:42 (GMT) |
commit | 2e8ab4ea5c2a17b5865c4f3884b8f27171da0db1 (patch) | |
tree | fa021cdee542d3636568416c37b3e66c7b438bbf /generic | |
parent | 0fd543a530069579d7b5ae7cc55401d2a0ad45b2 (diff) | |
download | tcl-2e8ab4ea5c2a17b5865c4f3884b8f27171da0db1.zip tcl-2e8ab4ea5c2a17b5865c4f3884b8f27171da0db1.tar.gz tcl-2e8ab4ea5c2a17b5865c4f3884b8f27171da0db1.tar.bz2 |
* generic/tclExecute.c: restoring the tcl_traceCompile functionality
while I repair tcl_traceExec. The core now compiles and runs
also under TCL_COMPILE_DEBUG, but execution in the bytecode
engine can still not be traced.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclExecute.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index c2e467e..efdcdbb 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclExecute.c,v 1.81 2002/07/22 10:04:17 dkf Exp $ + * RCS: @(#) $Id: tclExecute.c,v 1.82 2002/07/24 15:40:42 msofer Exp $ */ #include "tclInt.h" @@ -81,6 +81,12 @@ TCL_DECLARE_MUTEX(execMutex) */ int tclTraceExec = 0; + +/* + * Execution tracing temporarily disabled: WORK IN PROGRESS. + */ +#undef TCL_COMPILE_DEBUG + #endif /* |