diff options
| author | dgp <dgp@users.sourceforge.net> | 2007-03-01 21:03:20 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2007-03-01 21:03:20 (GMT) |
| commit | 73dcbd822997fc63a8269625fa8a9921181406b9 (patch) | |
| tree | e81baef8e1d40254321cb79fadeff8526b75156d /generic/tclCmdIL.c | |
| parent | 947cf558f6516fe5aac5fc54dd389b88a10d1f6f (diff) | |
| download | tcl-73dcbd822997fc63a8269625fa8a9921181406b9.zip tcl-73dcbd822997fc63a8269625fa8a9921181406b9.tar.gz tcl-73dcbd822997fc63a8269625fa8a9921181406b9.tar.bz2 | |
Remove line with no effect
Diffstat (limited to 'generic/tclCmdIL.c')
| -rw-r--r-- | generic/tclCmdIL.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 1a961ac..56e4a9e 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -16,7 +16,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCmdIL.c,v 1.99 2007/03/01 19:29:01 dgp Exp $ + * RCS: @(#) $Id: tclCmdIL.c,v 1.100 2007/03/01 21:03:20 dgp Exp $ */ #include "tclInt.h" @@ -3191,7 +3191,6 @@ Tcl_LrepeatObjCmd( Tcl_WrongNumArgs(interp, 1, objv, "positiveCount value ?value ...?"); return TCL_ERROR; } - elementCount = 0; result = Tcl_GetIntFromObj(interp, objv[1], &elementCount); if (result == TCL_ERROR) { return TCL_ERROR; |