summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2008-08-10 15:58:58 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2008-08-10 15:58:58 (GMT)
commitd661e47c352a7501f151528ad5b6e94e8de7bd46 (patch)
treec3c4ee183abbde2c988a4a87ef2e79e520646df7 /generic
parent0424a43c3010587b193ad4675b83670e0a0849eb (diff)
downloadtcl-d661e47c352a7501f151528ad5b6e94e8de7bd46.zip
tcl-d661e47c352a7501f151528ad5b6e94e8de7bd46.tar.gz
tcl-d661e47c352a7501f151528ad5b6e94e8de7bd46.tar.bz2
remove unused vars
Diffstat (limited to 'generic')
-rw-r--r--generic/tclProc.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index 12ae064..bee78ca 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.156 2008/08/10 15:35:36 msofer Exp $
+ * RCS: @(#) $Id: tclProc.c,v 1.157 2008/08/10 15:58:58 msofer Exp $
*/
#include "tclInt.h"
@@ -1904,11 +1904,9 @@ TclProcCompileProc(
const char *procName) /* Name of this procedure. */
{
Interp *iPtr = (Interp *) interp;
- int i;
Tcl_CallFrame *framePtr;
Proc *saveProcPtr;
ByteCode *codePtr = bodyPtr->internalRep.otherValuePtr;
- CompiledLocal *localPtr;
/*
* If necessary, compile the procedure's body. The compiler will allocate