diff options
author | dgp <dgp@users.sourceforge.net> | 2013-07-08 15:00:02 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2013-07-08 15:00:02 (GMT) |
commit | edb7dfc419cc7a8a06ed06669400e1e192a47c09 (patch) | |
tree | 293ba3b066324061630513ab676c7b4d556f4cca /generic/tclCompile.c | |
parent | 4e5f3c749a2ed1b7c44cb7d1040ed19b03898b18 (diff) | |
download | tcl-edb7dfc419cc7a8a06ed06669400e1e192a47c09.zip tcl-edb7dfc419cc7a8a06ed06669400e1e192a47c09.tar.gz tcl-edb7dfc419cc7a8a06ed06669400e1e192a47c09.tar.bz2 |
Consolidate the StartExpanding() calls.
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r-- | generic/tclCompile.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 0dc30e2..cbb93d9 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -1819,9 +1819,6 @@ CompileCommandTokens( envPtr->line = eclPtr->loc[wlineat].line[0]; envPtr->clNext = eclPtr->loc[wlineat].next[0]; - if (expand && !cmdPtr) { - StartExpanding(envPtr); - } if (cmdPtr) { int savedNumCmds = envPtr->numCommands; int update = 0; @@ -1919,11 +1916,10 @@ CompileCommandTokens( envPtr->line = eclPtr->loc[wlineat].line[0]; envPtr->clNext = eclPtr->loc[wlineat].next[0]; + } - /* TODO: Can this happen? If so, is this right? */ - if (expand) { - StartExpanding(envPtr); - } + if (expand) { + StartExpanding(envPtr); } /* |