summaryrefslogtreecommitdiffstats
path: root/generic/tclOODefineCmds.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2010-03-05 11:36:18 (GMT)
committerdkf <dkf@noemail.net>2010-03-05 11:36:18 (GMT)
commit5ba7e23db54042b3bb546b0d227da32adcde8a1a (patch)
tree80c81e95688d69dd27379d9f42e0c58551fc6575 /generic/tclOODefineCmds.c
parentc9fe324a027130343f1d94a790bb0a64fc4ee834 (diff)
downloadtcl-5ba7e23db54042b3bb546b0d227da32adcde8a1a.zip
tcl-5ba7e23db54042b3bb546b0d227da32adcde8a1a.tar.gz
tcl-5ba7e23db54042b3bb546b0d227da32adcde8a1a.tar.bz2
Remove unused variable
FossilOrigin-Name: 782cd0109d727682a3777c58a65d557378160b5e
Diffstat (limited to 'generic/tclOODefineCmds.c')
-rw-r--r--generic/tclOODefineCmds.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclOODefineCmds.c b/generic/tclOODefineCmds.c
index ad088af..1cf0786 100644
--- a/generic/tclOODefineCmds.c
+++ b/generic/tclOODefineCmds.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclOODefineCmds.c,v 1.12 2010/03/04 23:42:54 dkf Exp $
+ * RCS: @(#) $Id: tclOODefineCmds.c,v 1.13 2010/03/05 11:36:19 dkf Exp $
*/
#ifdef HAVE_CONFIG_H
@@ -1657,7 +1657,6 @@ TclOODefineSuperclassObjCmd(
Tcl_Obj *const *objv)
{
Object *oPtr;
- Foundation *fPtr = TclOOGetFoundation(interp);
Class **superclasses, *superPtr;
int i, j;