summaryrefslogtreecommitdiffstats
path: root/generic/tclCmdMZ.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2003-07-16 08:24:19 (GMT)
committerdkf <dkf@noemail.net>2003-07-16 08:24:19 (GMT)
commit88c60ba0152e4926e883fd9a17596840578fa439 (patch)
tree78a523c29c5679073e6343fa1fee3073626a9e63 /generic/tclCmdMZ.c
parent5a6944a1443fcdc1267155ea0c22c803f5247650 (diff)
downloadtcl-88c60ba0152e4926e883fd9a17596840578fa439.zip
tcl-88c60ba0152e4926e883fd9a17596840578fa439.tar.gz
tcl-88c60ba0152e4926e883fd9a17596840578fa439.tar.bz2
Removed trivially-unreachable line [Bug 771939]
FossilOrigin-Name: 287971e081364aec1c15a8b44f3e205f1b3f5a11
Diffstat (limited to 'generic/tclCmdMZ.c')
-rw-r--r--generic/tclCmdMZ.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c
index 2086335..ca1abef 100644
--- a/generic/tclCmdMZ.c
+++ b/generic/tclCmdMZ.c
@@ -14,7 +14,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclCmdMZ.c,v 1.82.2.5 2003/06/17 20:42:37 vincentdarley Exp $
+ * RCS: @(#) $Id: tclCmdMZ.c,v 1.82.2.6 2003/07/16 08:24:20 dkf Exp $
*/
#include "tclInt.h"
@@ -2996,7 +2996,6 @@ Tcl_TraceObjCmd(dummy, interp, objc, objv)
return TCL_ERROR;
}
return (traceSubCmds[typeIndex])(interp, optionIndex, objc, objv);
- break;
}
#ifndef TCL_REMOVE_OBSOLETE_TRACES
case TRACE_OLD_VARIABLE: {