summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2005-10-10 19:52:43 (GMT)
committerdgp <dgp@users.sourceforge.net>2005-10-10 19:52:43 (GMT)
commit0dce4fa5b68010813737f31033012ad6d4cb5bc3 (patch)
treeeb550b53c77c043fc0c7debdce2a23c2ca21711b /generic/tclExecute.c
parent6678ee462153f79ea3258c65a6e3902f6aa68de1 (diff)
downloadtcl-0dce4fa5b68010813737f31033012ad6d4cb5bc3.zip
tcl-0dce4fa5b68010813737f31033012ad6d4cb5bc3.tar.gz
tcl-0dce4fa5b68010813737f31033012ad6d4cb5bc3.tar.bz2
* generic/tclExecute.c: Corrections to the NO_WIDE_TYPE build. Also
added missing "break" to a switch that broke wide XOR operations.
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 12ca59d..67f2615 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclExecute.c,v 1.206 2005/10/10 18:00:10 dgp Exp $
+ * RCS: @(#) $Id: tclExecute.c,v 1.207 2005/10/10 19:52:43 dgp Exp $
*/
#include "tclInt.h"
@@ -4084,6 +4084,7 @@ TclExecuteByteCode(interp, codePtr)
break;
case INST_BITXOR:
wResult = w1 ^ w2;
+ break;
default:
/* Unused, here to silence compiler warning. */
wResult = 0;