diff options
| author | dgp <dgp@users.sourceforge.net> | 2014-12-09 20:29:09 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2014-12-09 20:29:09 (GMT) |
| commit | 916f1716f3f7dcdc6dc158c684aac96698e9e726 (patch) | |
| tree | b3b254bfcfebf31f5c21ebb4f60bf88c890db32c /generic/tclCompile.c | |
| parent | b27238fbbb6ee992d3f908e53606d862a8100c46 (diff) | |
| download | tcl-916f1716f3f7dcdc6dc158c684aac96698e9e726.zip tcl-916f1716f3f7dcdc6dc158c684aac96698e9e726.tar.gz tcl-916f1716f3f7dcdc6dc158c684aac96698e9e726.tar.bz2 | |
[e711ffb458] Replace TclIsLocalScalar() (which does the wrong thing).... with
PushVarNameWord() (which doesn't) in the compiler for [dict lappend].
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index f982359..5030f89 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -2288,8 +2288,8 @@ TclFindCompiledLocal( * scalar or array variable. If NULL, a * temporary var should be created. */ int nameBytes, /* Number of bytes in the name. */ - int create, /* If 1, allocate a local frame entry for the - * variable if it is new. */ + int create, /* If non-zero, allocate a local frame entry + * for the variable if it is new. */ register Proc *procPtr) /* Points to structure describing procedure * containing the variable reference. */ { |