summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authormig <mig>2013-01-11 21:16:07 (GMT)
committermig <mig>2013-01-11 21:16:07 (GMT)
commite5fc72423c12d157618f81231cc5ae12e0e8fc76 (patch)
tree47d8d83bd6a728fb9f08c04e5c43fd4bd45255b6 /generic/tclExecute.c
parentf531d3de422a79dcc477d10d83f2badbbc27e8ea (diff)
downloadtcl-e5fc72423c12d157618f81231cc5ae12e0e8fc76.zip
tcl-e5fc72423c12d157618f81231cc5ae12e0e8fc76.tar.gz
tcl-e5fc72423c12d157618f81231cc5ae12e0e8fc76.tar.bz2
better comments
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c8
1 files changed, 6 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index bc755e8..1ed8949 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -2301,6 +2301,10 @@ TEBCresume(
TCL_DTRACE_INST_NEXT();
while (*pc == INST_START_CMD) {
+ /*
+ * Peephole: do not run INST_START_CMD, just skip it
+ */
+
#ifdef TCL_COMPILE_STATS
iPtr->stats.instructionCount[*pc]++;
#endif
@@ -7062,13 +7066,13 @@ TEBCresume(
/*
* INST_START_CMD failure case removed where it doesn't bother that much
- */
- /* case INST_START_CMD:
*
* Remark that if the interpreter is marked for deletion its
* compileEpoch is modified, so that the epoch check also verifies
* that the interp is not deleted. If no outside call has been made
* since the last check, it is safe to omit the check.
+
+ * case INST_START_CMD:
*/
instStartCmdFailed: