summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorKevin B Kenny <kennykb@acm.org>2004-09-27 22:03:35 (GMT)
committerKevin B Kenny <kennykb@acm.org>2004-09-27 22:03:35 (GMT)
commitf110950bfea3fe5400481344d35fb20b5be5b3e6 (patch)
tree60d5b0837938aef95cdb2b27e6d44d40edbb1fb0 /generic
parent2253ddb0ac6ee264a0a6b3c36fd50da44ce739e6 (diff)
downloadtcl-f110950bfea3fe5400481344d35fb20b5be5b3e6.zip
tcl-f110950bfea3fe5400481344d35fb20b5be5b3e6.tar.gz
tcl-f110950bfea3fe5400481344d35fb20b5be5b3e6.tar.bz2
removed several unused vars in TclObjInvoke
Diffstat (limited to 'generic')
-rw-r--r--generic/tclBasic.c5
1 files changed, 1 insertions, 4 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 34f3356..fabec6f 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.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: tclBasic.c,v 1.117 2004/09/27 16:24:23 dgp Exp $
+ * RCS: @(#) $Id: tclBasic.c,v 1.118 2004/09/27 22:03:42 kennykb Exp $
*/
#include "tclInt.h"
@@ -4249,11 +4249,8 @@ TclObjInvoke(interp, objc, objv, flags)
Tcl_HashTable *hTblPtr; /* Table of hidden commands. */
char *cmdName; /* Name of the command from objv[0]. */
register Tcl_HashEntry *hPtr;
- Tcl_Command cmd;
Command *cmdPtr;
- int localObjc; /* Used to invoke "unknown" if the */
Tcl_Obj **localObjv = NULL; /* command is not found. */
- register int i;
int result;
if (interp == (Tcl_Interp *) NULL) {