diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2010-03-05 11:36:19 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2010-03-05 11:36:19 (GMT) |
commit | f7a64b3a111891d5f7f79ce94bbb37abedd30176 (patch) | |
tree | 80c81e95688d69dd27379d9f42e0c58551fc6575 /generic/tclOODefineCmds.c | |
parent | 7450c3fa6dd11ccc316cd37f463ae02cd8f41b18 (diff) | |
download | tcl-f7a64b3a111891d5f7f79ce94bbb37abedd30176.zip tcl-f7a64b3a111891d5f7f79ce94bbb37abedd30176.tar.gz tcl-f7a64b3a111891d5f7f79ce94bbb37abedd30176.tar.bz2 |
Remove unused variable
Diffstat (limited to 'generic/tclOODefineCmds.c')
-rw-r--r-- | generic/tclOODefineCmds.c | 3 |
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; |