diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-08-06 04:15:16 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-08-06 04:15:16 (GMT) |
| commit | b3b497f42cfe1a533488c23fb8dfd706e7bb59a6 (patch) | |
| tree | f88d7e06cf4d84b785efd54e3c57abbc059a78f0 /generic/tclCompile.c | |
| parent | aa01137e0e936cc97ab7ba3c80ab39b7772938f0 (diff) | |
| download | tcl-b3b497f42cfe1a533488c23fb8dfd706e7bb59a6.zip tcl-b3b497f42cfe1a533488c23fb8dfd706e7bb59a6.tar.gz tcl-b3b497f42cfe1a533488c23fb8dfd706e7bb59a6.tar.bz2 | |
The value TCL_LOCATION_EVAL_LIST in the type field of a CmdFrame appears to
exist only for the sake of taking great pains to make sure that pure list
values remain pure list values.
The value of pure list values is no longer what it once was. For a long long
time now, any canonical list values have been equally good. This branch
is Work In Progress eliminating the complication of the additional type value.
Currently some minor botches are breaking execution tracing tests.
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 772ce22..618b6fa 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -1375,7 +1375,7 @@ TclInitCompileEnv( envPtr->extCmdMapPtr->nuloc = 0; envPtr->extCmdMapPtr->path = NULL; - if ((invoker == NULL) || (invoker->type == TCL_LOCATION_EVAL_LIST)) { + if (invoker == NULL) { /* * Initialize the compiler for relative counting in case of a * dynamic context. |