diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-05-11 20:02:43 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-05-11 20:02:43 (GMT) |
| commit | b5dfface8d2bbb92709c3ce349d4f101a4354361 (patch) | |
| tree | 97b8fc6e423461141b89ee540d8a912fb774310c /generic/tclCompile.c | |
| parent | 9571165813914daaf16bd8fb71b4f97e7affa1d6 (diff) | |
| download | tcl-b5dfface8d2bbb92709c3ce349d4f101a4354361.zip tcl-b5dfface8d2bbb92709c3ce349d4f101a4354361.tar.gz tcl-b5dfface8d2bbb92709c3ce349d4f101a4354361.tar.bz2 | |
Partial fix: still ongoing
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 1da6e03..838d801 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -1434,7 +1434,7 @@ TclInitCompileEnv( { Interp *iPtr = (Interp *) interp; - assert(tclInstructionTable[LAST_INST_OPCODE].name == NULL); + assert(tclInstructionTable[LAST_INST_OPCODE+1].name == NULL); envPtr->iPtr = iPtr; envPtr->source = stringPtr; |