diff options
author | andreas_kupries <akupries@shaw.ca> | 2008-07-25 22:11:18 (GMT) |
---|---|---|
committer | andreas_kupries <akupries@shaw.ca> | 2008-07-25 22:11:18 (GMT) |
commit | e6ab7a094e17c5ecfaed583a37feb06afbc6bd94 (patch) | |
tree | 39a2112341211435426b708bc1f762560a383c9a /generic/tclProc.c | |
parent | 492567dd1a47ceb460e19a20e233ff6d1efeb5ab (diff) | |
download | tcl-e6ab7a094e17c5ecfaed583a37feb06afbc6bd94.zip tcl-e6ab7a094e17c5ecfaed583a37feb06afbc6bd94.tar.gz tcl-e6ab7a094e17c5ecfaed583a37feb06afbc6bd94.tar.bz2 |
* tests/info.test: Tests 38.* added, exactly testing the tracking
of location for uplevel scripts. Resolved merge conflict on
info-37.0, switched !singleTestInterp constraint to glob matching
instead. Ditto info-22.8, removed constraint, more glob matching,
and reduced the depth of the stack we check. More is coming, right
now I want to commit the bug fixes.
* tests/oo.test: Updated oo-22.1 for expanded location tracking.
* generic/tclCompile.c (TclInitCompileEnv): Reorganized the
initialization of the #280 location information to match the flow
in TclEvalObjEx to get more absolute contexts.
* generic/tclBasic.c (TclEvalObjEx): Added missing cleanup of
extended location information.
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r-- | generic/tclProc.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index 9947549..63aa7d5 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.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: tclProc.c,v 1.151 2008/07/21 22:50:36 andreas_kupries Exp $ + * RCS: @(#) $Id: tclProc.c,v 1.152 2008/07/25 22:11:21 andreas_kupries Exp $ */ #include "tclInt.h" @@ -2281,7 +2281,7 @@ TclProcCleanupProc( /* * TIP #280: Release the location data associated with this Proc * structure, if any. The interpreter may not exist (For example for - * procbody structurues created by tbcload. + * procbody structures created by tbcload. */ if (!iPtr) { |