diff options
| author | mig <mig> | 2013-01-12 10:53:23 (GMT) |
|---|---|---|
| committer | mig <mig> | 2013-01-12 10:53:23 (GMT) |
| commit | 71ccd57a94c21d7e36abe8550f656e6f082a2907 (patch) | |
| tree | eb2cd91959859136b4b1e2d0ec8dcd7a93668e7f /generic/tclExecute.c | |
| parent | ab85720d9820b140486e1517a6bff19cfacffd32 (diff) | |
| download | tcl-71ccd57a94c21d7e36abe8550f656e6f082a2907.zip tcl-71ccd57a94c21d7e36abe8550f656e6f082a2907.tar.gz tcl-71ccd57a94c21d7e36abe8550f656e6f082a2907.tar.bz2 | |
discouraging the compiler from re-reading *pc in the peephole loop, part2 (any diff?)
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 5bf0e79..628dfe7 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -2315,16 +2315,12 @@ TEBCresume( if (inst == INST_LOAD_SCALAR1) { goto instLoadScalar1; - } - - if (inst == INST_PUSH1) { + } else if (inst == INST_PUSH1) { PUSH_OBJECT(codePtr->objArrayPtr[TclGetUInt1AtPtr(pc+1)]); TRACE_WITH_OBJ(("%u => ", TclGetInt1AtPtr(pc+1)), OBJ_AT_TOS); inst = *(pc += 2); goto peepholeStart; - } - - if (inst == INST_START_CMD) { + } else if (inst == INST_START_CMD) { /* * Peephole: do not run INST_START_CMD, just skip it */ |