summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authormig <mig>2013-01-12 10:53:23 (GMT)
committermig <mig>2013-01-12 10:53:23 (GMT)
commit71ccd57a94c21d7e36abe8550f656e6f082a2907 (patch)
treeeb2cd91959859136b4b1e2d0ec8dcd7a93668e7f /generic/tclExecute.c
parentab85720d9820b140486e1517a6bff19cfacffd32 (diff)
downloadtcl-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.c8
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
*/