summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2014-11-24 03:08:50 (GMT)
committerdgp <dgp@users.sourceforge.net>2014-11-24 03:08:50 (GMT)
commit7f5ddf43eee64cc31303c2659b011bceba8ff06c (patch)
treee0b4c66155f7aa06da89bede96167e39fb8b900b /generic
parent2b3e4035506666e8a68af0748051d9798b08afca (diff)
parent484de8b9879c4344a7f31bf0940aa2eaf943d30f (diff)
downloadtcl-7f5ddf43eee64cc31303c2659b011bceba8ff06c.zip
tcl-7f5ddf43eee64cc31303c2659b011bceba8ff06c.tar.gz
tcl-7f5ddf43eee64cc31303c2659b011bceba8ff06c.tar.bz2
[e087812465] Trim back operatorStrings array to just the entries that are needed. Trims away the part of the array that was out of sync with the opcodes.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclExecute.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 2e03ab4..337a75f 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -81,9 +81,7 @@ int tclTraceExec = 0;
static const char *const operatorStrings[] = {
"||", "&&", "|", "^", "&", "==", "!=", "<", ">", "<=", ">=", "<<", ">>",
- "+", "-", "*", "/", "%", "+", "-", "~", "!",
- "BUILTIN FUNCTION", "FUNCTION",
- "", "", "", "", "", "", "", "", "eq", "ne"
+ "+", "-", "*", "/", "%", "+", "-", "~", "!"
};
/*
@@ -9830,7 +9828,7 @@ IllegalExprOperandType(
if (opcode == INST_EXPON) {
operator = "**";
- } else if (opcode <= INST_STR_NEQ) {
+ } else if (opcode <= INST_LNOT) {
operator = operatorStrings[opcode - INST_LOR];
}