diff options
| author | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-02 15:10:00 (GMT) |
|---|---|---|
| committer | donal.k.fellows@manchester.ac.uk <dkf> | 2013-01-02 15:10:00 (GMT) |
| commit | e2b86d2864e39e74f9067a0ce1b9397c9ab66156 (patch) | |
| tree | 8390f95edaf4e8f260b6af49e4fb249016cee354 /generic/tclCompile.c | |
| parent | 6e6dfd70a0e6b2994a128071c63ea0088bda1a5a (diff) | |
| download | tcl-e2b86d2864e39e74f9067a0ce1b9397c9ab66156.zip tcl-e2b86d2864e39e74f9067a0ce1b9397c9ab66156.tar.gz tcl-e2b86d2864e39e74f9067a0ce1b9397c9ab66156.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> */ |