diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-01-02 15:10:00 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-01-02 15:10:00 (GMT) |
commit | 92d844b187a1a7cd56fc2955b50aa461cd9e0086 (patch) | |
tree | 8390f95edaf4e8f260b6af49e4fb249016cee354 /generic/tclCompile.c | |
parent | 42b09bbed6f6321e1ef37e138d47cb0a508d3f93 (diff) | |
download | tcl-92d844b187a1a7cd56fc2955b50aa461cd9e0086.zip tcl-92d844b187a1a7cd56fc2955b50aa461cd9e0086.tar.gz tcl-92d844b187a1a7cd56fc2955b50aa461cd9e0086.tar.bz2 |
Passing more tests.
Diffstat (limited to 'generic/tclCompile.c')
-rw-r--r-- | generic/tclCompile.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index c052531..45a74d7 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -529,7 +529,7 @@ InstructionDesc const tclInstructionTable[] = { /* Forces the variable indexed by opnd to be an array. Does not touch * the stack. */ - {"invokeReplace", 5, INT_MIN, 1, {OPERAND_UINT4}}, + {"invokeReplace", 6, INT_MIN, 2, {OPERAND_UINT4,OPERAND_UINT1}}, /* Invoke command named objv[0], replacing the first two words with * the word at the top of the stack; * <objc,objv> = <op4,top op4 after popping 1> */ |