summaryrefslogtreecommitdiffstats
path: root/generic/tclMathOp.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2006-12-08 18:08:33 (GMT)
committerdgp <dgp@users.sourceforge.net>2006-12-08 18:08:33 (GMT)
commitc31a5d22b7398ccaa6b9d0e17e4865563253b0f5 (patch)
treefb63e564b3c47e38440f42ab67e1d573b49d5a5e /generic/tclMathOp.c
parent075c0449ce2a01114dcd419a912889ce694a35cc (diff)
downloadtcl-c31a5d22b7398ccaa6b9d0e17e4865563253b0f5.zip
tcl-c31a5d22b7398ccaa6b9d0e17e4865563253b0f5.tar.gz
tcl-c31a5d22b7398ccaa6b9d0e17e4865563253b0f5.tar.bz2
* generic/tclCompExpr.c: Revised implementation of TclInvertOpCmd
* generic/tclMathOp.c: to perform a bytecode compile / execute sequence. This demonstrates a path toward avoiding mountains of code duplication in tclMathOp.c and tclExecute.c. * generic/tclCompile.h: Change TclExecuteByteCode() from static to * generic/tclExecute.c: MODULE_SCOPE so all files including tclCompile.h may call it.
Diffstat (limited to 'generic/tclMathOp.c')
-rw-r--r--generic/tclMathOp.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclMathOp.c b/generic/tclMathOp.c
index f4a5b53..f146a39 100644
--- a/generic/tclMathOp.c
+++ b/generic/tclMathOp.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclMathOp.c,v 1.5 2006/12/08 16:14:17 dgp Exp $
+ * RCS: @(#) $Id: tclMathOp.c,v 1.6 2006/12/08 18:08:37 dgp Exp $
*/
#include "tclInt.h"
@@ -1047,7 +1047,7 @@ CompareNumbers(
*
*----------------------------------------------------------------------
*/
-
+#if 0
int
TclInvertOpCmd(
ClientData clientData,
@@ -1108,6 +1108,7 @@ TclInvertOpCmd(
}
}
}
+#endif
/*
*----------------------------------------------------------------------