summaryrefslogtreecommitdiffstats
path: root/generic/tclBasic.c
diff options
context:
space:
mode:
authorapnadkarni <apnmbx-wits@yahoo.com>2024-06-27 06:32:58 (GMT)
committerapnadkarni <apnmbx-wits@yahoo.com>2024-06-27 06:32:58 (GMT)
commit0a9d52fe0baac8abc61494f6bf379616535977fe (patch)
treec17e6b9844f726ced8a7654ab48570b2c2d51c7c /generic/tclBasic.c
parent46021e3a59c7f719550f8517d62a543b31d6bbef (diff)
parentef8e2184333082bb0ebc81299155842b8f43ffca (diff)
downloadtcl-0a9d52fe0baac8abc61494f6bf379616535977fe.zip
tcl-0a9d52fe0baac8abc61494f6bf379616535977fe.tar.gz
tcl-0a9d52fe0baac8abc61494f6bf379616535977fe.tar.bz2
Add tcl::unsupported::icu command
Diffstat (limited to 'generic/tclBasic.c')
-rw-r--r--generic/tclBasic.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 6ce4234..16cc531 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -1198,6 +1198,10 @@ Tcl_CreateInterp(void)
Tcl_CreateObjCommand(interp, "::tcl::unsupported::corotype",
CoroTypeObjCmd, NULL, NULL);
+ /* Load and intialize ICU */
+ Tcl_CreateObjCommand(interp, "::tcl::unsupported::loadIcu",
+ TclLoadIcuObjCmd, NULL, NULL);
+
/* Export unsupported commands */
nsPtr = Tcl_FindNamespace(interp, "::tcl::unsupported", NULL, 0);
if (nsPtr) {