diff options
author | dgp <dgp@users.sourceforge.net> | 2011-10-13 18:19:26 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-10-13 18:19:26 (GMT) |
commit | 18dff8dc18b2826f2160ce237232b1c73a08be93 (patch) | |
tree | bb33d92dd9c9ed0d4f30dd9609d253388f85faf9 | |
parent | c0473e256855d4fd008395dd43e4cad66af222d5 (diff) | |
download | tcl-18dff8dc18b2826f2160ce237232b1c73a08be93.zip tcl-18dff8dc18b2826f2160ce237232b1c73a08be93.tar.gz tcl-18dff8dc18b2826f2160ce237232b1c73a08be93.tar.bz2 |
Correct botch.
-rw-r--r-- | generic/tclTest.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 03afad9..cbebacd 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -7117,6 +7117,7 @@ TestparseargsCmd( TCL_ARGV_AUTO_REST, TCL_ARGV_AUTO_HELP, TCL_ARGV_TABLE_END }; + foo = 0; if (Tcl_ParseArgsObjv(interp, argTable, &count, objv, &remObjv)!=TCL_OK) { return TCL_ERROR; } |