From 09420076cacf4e1fa0d7ca3f044af5fda0b2cf65 Mon Sep 17 00:00:00 2001 From: dgp Date: Tue, 1 Feb 2005 17:26:28 +0000 Subject: * generic/tclExecute.c (TclCompEvalObj): Removed stray statement left behind in prior code reorganization. --- ChangeLog | 5 +++++ generic/tclExecute.c | 3 +-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 2ff1abd..0760372 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2005-02-01 Don Porter + + * generic/tclExecute.c (TclCompEvalObj): Removed stray statement + left behind in prior code reorganization. + 2005-01-28 Jeff Hobbs * unix/configure, unix/tcl.m4: add solaris 64-bit gcc build diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 04862e4..99e1d67 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.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: tclExecute.c,v 1.94.2.10 2004/11/02 15:46:35 dkf Exp $ + * RCS: @(#) $Id: tclExecute.c,v 1.94.2.11 2005/02/01 17:26:32 dgp Exp $ */ #include "tclInt.h" @@ -922,7 +922,6 @@ TclCompEvalObj(interp, objPtr) iPtr->numLevels--; return result; } - iPtr->evalFlags = 0; codePtr = (ByteCode *) objPtr->internalRep.otherValuePtr; } else { /* -- cgit v0.12