diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-02-15 12:02:48 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-02-15 12:02:48 (GMT) |
commit | ef8842098dc6103ef6fc6fc7deb1b7e5395e85a2 (patch) | |
tree | 9e92fe62aa3daa6cfefd6a65813ad18546ab28aa /generic/tclInt.h | |
parent | 3aa1601f2afddd655694ff5cd8541c0572736c3c (diff) | |
download | tcl-ef8842098dc6103ef6fc6fc7deb1b7e5395e85a2.zip tcl-ef8842098dc6103ef6fc6fc7deb1b7e5395e85a2.tar.gz tcl-ef8842098dc6103ef6fc6fc7deb1b7e5395e85a2.tar.bz2 |
* generic/tclCompCmds.c (TclCompileLrangeCmd): Add compiler for
[lrange] with constant indices so we can take advantage of existing
TCL_LIST_RANGE_IMM opcode.
(TclCompileLindexCmd): Improve coverage of constant-index-style
compliation using technique developed for [lrange] above.
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index feede54..37fce70 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3547,6 +3547,9 @@ MODULE_SCOPE int TclCompileListCmd(Tcl_Interp *interp, MODULE_SCOPE int TclCompileLlengthCmd(Tcl_Interp *interp, Tcl_Parse *parsePtr, Command *cmdPtr, struct CompileEnv *envPtr); +MODULE_SCOPE int TclCompileLrangeCmd(Tcl_Interp *interp, + Tcl_Parse *parsePtr, Command *cmdPtr, + struct CompileEnv *envPtr); MODULE_SCOPE int TclCompileLsetCmd(Tcl_Interp *interp, Tcl_Parse *parsePtr, Command *cmdPtr, struct CompileEnv *envPtr); |