summaryrefslogtreecommitdiffstats
path: root/generic/tclCmdMZ.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-10-29 21:35:49 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-10-29 21:35:49 (GMT)
commit05d8b591837b723be192e9df1ada8df1701a74b5 (patch)
tree2f37ec079458d2dd670f4ac91e414deec83d160b /generic/tclCmdMZ.c
parentbedb57a468dd806574089fc8b9eee940129c156b (diff)
downloadtcl-05d8b591837b723be192e9df1ada8df1701a74b5.zip
tcl-05d8b591837b723be192e9df1ada8df1701a74b5.tar.gz
tcl-05d8b591837b723be192e9df1ada8df1701a74b5.tar.bz2
Added compilation of simplest practical case of [string map].
Diffstat (limited to 'generic/tclCmdMZ.c')
-rw-r--r--generic/tclCmdMZ.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c
index 9e720ea..1f210dd 100644
--- a/generic/tclCmdMZ.c
+++ b/generic/tclCmdMZ.c
@@ -3309,7 +3309,7 @@ TclInitStringCmd(
{"is", StringIsCmd, NULL, NULL, NULL, 0},
{"last", StringLastCmd, NULL, 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},
{"repeat", StringReptCmd, NULL, NULL, NULL, 0},