diff options
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index c409726..e1d2017 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompile.c,v 1.21.4.1 2001/05/11 20:47:44 hobbs Exp $ + * RCS: @(#) $Id: tclCompile.c,v 1.21.4.2 2001/05/15 20:07:38 hobbs Exp $ */ #include "tclInt.h" @@ -232,8 +232,6 @@ InstructionDesc instructionTable[] = { /* Append scalar variable at op1<=255 in frame; value is stktop */ {"appendScalar4", 5, 1, {OPERAND_UINT4}}, /* Append scalar variable at op1 > 255 in frame; value is stktop */ - {"appendScalarStk", 1, 0, {OPERAND_NONE}}, - /* Append scalar; value is stktop, scalar name is stknext */ {"appendArray1", 2, 1, {OPERAND_UINT1}}, /* Append array element; array at op1<=255, value is top then elem */ {"appendArray4", 5, 1, {OPERAND_UINT4}}, @@ -246,8 +244,6 @@ InstructionDesc instructionTable[] = { /* Lappend scalar variable at op1<=255 in frame; value is stktop */ {"lappendScalar4", 5, 1, {OPERAND_UINT4}}, /* Lappend scalar variable at op1 > 255 in frame; value is stktop */ - {"lappendScalarStk", 1, 0, {OPERAND_NONE}}, - /* Lappend scalar; value is stktop, scalar name is stknext */ {"lappendArray1", 2, 1, {OPERAND_UINT1}}, /* Lappend array element; array at op1<=255, value is top then elem */ {"lappendArray4", 5, 1, {OPERAND_UINT4}}, |