diff options
| author | dgp <dgp@users.sourceforge.net> | 2008-03-07 21:07:13 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2008-03-07 21:07:13 (GMT) |
| commit | 4836d8cd07f44d31f6c4edfe2726dd28d3309b5a (patch) | |
| tree | da453b7a49a098922b298e89713fffaad709751a /generic/tclExecute.c | |
| parent | ca62a26f9972222ac1357de0376c06052d7cd905 (diff) | |
| download | tcl-4836d8cd07f44d31f6c4edfe2726dd28d3309b5a.zip tcl-4836d8cd07f44d31f6c4edfe2726dd28d3309b5a.tar.gz tcl-4836d8cd07f44d31f6c4edfe2726dd28d3309b5a.tar.bz2 | |
commentary cleanup
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 78296fd..102dddc 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -13,7 +13,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.365 2008/03/07 19:26:22 dgp Exp $ + * RCS: @(#) $Id: tclExecute.c,v 1.366 2008/03/07 21:07:13 dgp Exp $ */ #include "tclInt.h" @@ -1215,7 +1215,7 @@ Tcl_ExprObj( /* * Get the expression ByteCode from the object. If it exists, make sure it - * is valid in the current context. If not + * is valid in the current context. */ if (objPtr->typePtr == &exprCodeType) { Namespace *namespacePtr = iPtr->varFramePtr->nsPtr; @@ -1350,7 +1350,7 @@ DupExprCodeInternalRep( * None. * * Side effects: - * + * May free allocated memory. Leaves objPtr untyped. *---------------------------------------------------------------------- */ |