diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2007-03-20 15:23:51 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2007-03-20 15:23:51 (GMT) |
| commit | 093c0298f0c883fcaf692628c7be6d0a749b54a5 (patch) | |
| tree | 32f2f690f57192c83e7d23958e65da0c02ee6849 /generic/tclExecute.c | |
| parent | 0f74a518f202826ef42a4b892f9c62716c180783 (diff) | |
| download | tcl-093c0298f0c883fcaf692628c7be6d0a749b54a5.zip tcl-093c0298f0c883fcaf692628c7be6d0a749b54a5.tar.gz tcl-093c0298f0c883fcaf692628c7be6d0a749b54a5.tar.bz2 | |
Fix trivial error in comment.
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 6c39e01..e15053b 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -12,7 +12,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.261 2007/03/12 20:45:27 dgp Exp $ + * RCS: @(#) $Id: tclExecute.c,v 1.262 2007/03/20 15:23:51 dkf Exp $ */ #include "tclInt.h" @@ -1572,7 +1572,7 @@ TclExecuteByteCode( * If nothing is to be appended, just return the first object by * dropping all the others from the stack; this saves both the * computation and copy of the string rep of the first object, - * enabling the fast '$x[set x {}]' idiom for 'K $x [set x{}]'. + * enabling the fast '$x[set x {}]' idiom for 'K $x [set x {}]'. */ if (appendLen == 0) { |