diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-05-30 10:29:41 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-05-30 10:29:41 (GMT) |
| commit | db5a66dd2c12c66e83843f772ef35bba03514696 (patch) | |
| tree | a354068a2963eb10fb54ab12c2ab4d3525424a35 | |
| parent | 82c027f092937aee7ba474c52faf0d727a7da8a0 (diff) | |
| download | tcl-db5a66dd2c12c66e83843f772ef35bba03514696.zip tcl-db5a66dd2c12c66e83843f772ef35bba03514696.tar.gz tcl-db5a66dd2c12c66e83843f772ef35bba03514696.tar.bz2 | |
Corrected code generation when doing the second run with an 'infinite' loop.
| -rw-r--r-- | generic/tclCompCmdsSZ.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCompCmdsSZ.c b/generic/tclCompCmdsSZ.c index 3fb8712..ed4d962 100644 --- a/generic/tclCompCmdsSZ.c +++ b/generic/tclCompCmdsSZ.c @@ -2859,7 +2859,7 @@ TclCompileWhileCmd( * INST_START_CMD, and hence counted properly. [Bug 1752146] */ - envPtr->atCmdStart = 0; + envPtr->atCmdStart &= ~1; testCodeOffset = CurrentOffset(envPtr); } |