diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-05 14:55:14 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-05 14:55:14 (GMT) |
commit | 17d34ed9ea3e7f173fad801e48240de9a99d77e8 (patch) | |
tree | e444cd464f93f10ffab5483b5917f5eb87b7cc2b /generic/tclCmdMZ.c | |
parent | 18dbdc3e40e19a7266c19924537e6914840adbe5 (diff) | |
parent | cd1f27f0cf22ec6b5b83f2fd48c1ba93e5c27be2 (diff) | |
download | tcl-17d34ed9ea3e7f173fad801e48240de9a99d77e8.zip tcl-17d34ed9ea3e7f173fad801e48240de9a99d77e8.tar.gz tcl-17d34ed9ea3e7f173fad801e48240de9a99d77e8.tar.bz2 |
Added bytecode compilation of many Tcl commands, merged from development branch.
Diffstat (limited to 'generic/tclCmdMZ.c')
-rw-r--r-- | generic/tclCmdMZ.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index 88b3420..fc957c4 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -3327,14 +3327,14 @@ TclInitStringCmd( {"bytelength", StringBytesCmd, NULL, NULL, NULL, 0}, {"compare", StringCmpCmd, TclCompileStringCmpCmd, NULL, NULL, 0}, {"equal", StringEqualCmd, TclCompileStringEqualCmd, NULL, NULL, 0}, - {"first", StringFirstCmd, NULL, NULL, NULL, 0}, + {"first", StringFirstCmd, TclCompileStringFirstCmd, NULL, NULL, 0}, {"index", StringIndexCmd, TclCompileStringIndexCmd, NULL, NULL, 0}, {"is", StringIsCmd, NULL, NULL, NULL, 0}, - {"last", StringLastCmd, NULL, NULL, NULL, 0}, + {"last", StringLastCmd, TclCompileStringLastCmd, NULL, NULL, 0}, {"length", StringLenCmd, TclCompileStringLenCmd, NULL, NULL, 0}, - {"map", StringMapCmd, NULL, NULL, NULL, 0}, + {"map", StringMapCmd, TclCompileStringMapCmd, NULL, NULL, 0}, {"match", StringMatchCmd, TclCompileStringMatchCmd, NULL, NULL, 0}, - {"range", StringRangeCmd, NULL, NULL, NULL, 0}, + {"range", StringRangeCmd, TclCompileStringRangeCmd, NULL, NULL, 0}, {"repeat", StringReptCmd, NULL, NULL, NULL, 0}, {"replace", StringRplcCmd, NULL, NULL, NULL, 0}, {"reverse", StringRevCmd, NULL, NULL, NULL, 0}, |