diff options
| author | Miguel Sofer <miguel.sofer@gmail.com> | 2004-10-17 14:22:07 (GMT) |
|---|---|---|
| committer | Miguel Sofer <miguel.sofer@gmail.com> | 2004-10-17 14:22:07 (GMT) |
| commit | c5e8b71d6e3be0bf8385db975f0f91a717cbd7e8 (patch) | |
| tree | c3138d728f753c2bcf09eaa0cb9b91601490fdfe /generic/tclResult.c | |
| parent | 7118dbc976774fdef3cc20ad168c22f23ed582f0 (diff) | |
| download | tcl-c5e8b71d6e3be0bf8385db975f0f91a717cbd7e8.zip tcl-c5e8b71d6e3be0bf8385db975f0f91a717cbd7e8.tar.gz tcl-c5e8b71d6e3be0bf8385db975f0f91a717cbd7e8.tar.bz2 | |
generic/tclResult.c: removed unused variable [Bug 1048588].
Diffstat (limited to 'generic/tclResult.c')
| -rw-r--r-- | generic/tclResult.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclResult.c b/generic/tclResult.c index 9fd0bfc..2545d1f 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclResult.c,v 1.15 2004/10/15 04:01:33 dgp Exp $ + * RCS: @(#) $Id: tclResult.c,v 1.16 2004/10/17 14:22:08 msofer Exp $ */ #include "tclInt.h" @@ -941,7 +941,6 @@ TclTransferResult(sourceInterp, result, targetInterp) * are the same, nothing is done. */ { Interp *iPtr; - Tcl_Obj *objPtr; if (sourceInterp == targetInterp) { return; |