diff options
| author | dgp@users.sourceforge.net <dgp> | 2004-10-07 00:24:49 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2004-10-07 00:24:49 (GMT) |
| commit | 652a8f8e06c96553a1a3963497fd6a42b5ddddee (patch) | |
| tree | 60ddd8d940883267c3309cc3c5242a66ce248f21 /generic/tclIOCmd.c | |
| parent | 19ea4a5fdca7d41e4137bac5036293b21b10e73f (diff) | |
| download | tcl-652a8f8e06c96553a1a3963497fd6a42b5ddddee.zip tcl-652a8f8e06c96553a1a3963497fd6a42b5ddddee.tar.gz tcl-652a8f8e06c96553a1a3963497fd6a42b5ddddee.tar.bz2 | |
remove unused var
Diffstat (limited to 'generic/tclIOCmd.c')
| -rw-r--r-- | generic/tclIOCmd.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIOCmd.c b/generic/tclIOCmd.c index 73af20a..732b162 100644 --- a/generic/tclIOCmd.c +++ b/generic/tclIOCmd.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: tclIOCmd.c,v 1.21 2004/10/06 15:59:24 dgp Exp $ + * RCS: @(#) $Id: tclIOCmd.c,v 1.22 2004/10/07 00:24:49 dgp Exp $ */ #include "tclInt.h" @@ -227,7 +227,7 @@ Tcl_GetsObjCmd(dummy, interp, objc, objv) int lineLen; /* Length of line just read. */ int mode; /* Mode in which channel is opened. */ char *name; - Tcl_Obj *resultPtr, *linePtr; + Tcl_Obj *linePtr; if ((objc != 2) && (objc != 3)) { Tcl_WrongNumArgs(interp, 1, objv, "channelId ?varName?"); |