summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--generic/tclCmdAH.c8
2 files changed, 6 insertions, 7 deletions
diff --git a/ChangeLog b/ChangeLog
index ddd3ce6..e6a9b96 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-10-30 Miguel Sofer <msofer@users.sf.net>
+
+ * generic/tclCmdAH.c (Tcl_CatchObjCmd): removed erroneous comment
+ [Bug 1029518]
+
2004-10-29 Don Porter <dgp@users.sourceforge.net>
* library/tcltest/tcltest.tcl: Correct reaction to errors in the
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c
index c015b1b..4d99fbd 100644
--- a/generic/tclCmdAH.c
+++ b/generic/tclCmdAH.c
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclCmdAH.c,v 1.27.2.10 2004/10/28 04:16:20 dgp Exp $
+ * RCS: @(#) $Id: tclCmdAH.c,v 1.27.2.11 2004/10/30 21:00:09 msofer Exp $
*/
#include "tclInt.h"
@@ -241,12 +241,6 @@ Tcl_CatchObjCmd(dummy, interp, objc, objv)
return TCL_ERROR;
}
- /*
- * Save a pointer to the variable name object, if any, in case the
- * Tcl_EvalObj reallocates the bytecode interpreter's evaluation
- * stack rendering objv invalid.
- */
-
if (objc == 3) {
varNamePtr = objv[2];
}