summaryrefslogtreecommitdiffstats
path: root/generic/tclCmdMZ.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2013-12-12 09:57:38 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2013-12-12 09:57:38 (GMT)
commit959c0b7ee6f676289f4bcb26638947b88e7d576b (patch)
tree4cb08550c837cab30e5cea4d183ea9327066e895 /generic/tclCmdMZ.c
parent6665e28f718ef3c403652ca551b6cadd3a3318aa (diff)
downloadtcl-959c0b7ee6f676289f4bcb26638947b88e7d576b.zip
tcl-959c0b7ee6f676289f4bcb26638947b88e7d576b.tar.gz
tcl-959c0b7ee6f676289f4bcb26638947b88e7d576b.tar.bz2
simple compilation of [string replace]
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 da8ffe3..cefe850 100644
--- a/generic/tclCmdMZ.c
+++ b/generic/tclCmdMZ.c
@@ -3339,7 +3339,7 @@ TclInitStringCmd(
{"match", StringMatchCmd, TclCompileStringMatchCmd, NULL, NULL, 0},
{"range", StringRangeCmd, TclCompileStringRangeCmd, NULL, NULL, 0},
{"repeat", StringReptCmd, TclCompileBasic2ArgCmd, NULL, NULL, 0},
- {"replace", StringRplcCmd, NULL, NULL, NULL, 0},
+ {"replace", StringRplcCmd, TclCompileStringReplaceCmd, NULL, NULL, 0},
{"reverse", StringRevCmd, TclCompileBasic1ArgCmd, NULL, NULL, 0},
{"tolower", StringLowerCmd, TclCompileStringToLowerCmd, NULL, NULL, 0},
{"toupper", StringUpperCmd, TclCompileStringToUpperCmd, NULL, NULL, 0},