From 3e2014216af5a54eec83355257ed2f95f9d8bf41 Mon Sep 17 00:00:00 2001 From: sebres Date: Wed, 6 Mar 2019 12:25:11 +0000 Subject: part of [db95e7a61e] reverted for consistency reasons: unsupported namespace is exported in previous versions (so this is more compatible to 8.5/8.6). --- generic/tclBasic.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 644f3e6..d914690 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -975,6 +975,13 @@ Tcl_CreateInterp(void) Tcl_NRCreateCommand(interp, "::tcl::unsupported::inject", NULL, NRCoroInjectObjCmd, NULL, NULL); + /* Export unsupported commands */ + nsPtr = Tcl_FindNamespace(interp, "::tcl::unsupported", NULL, 0); + if (nsPtr) { + Tcl_Export(interp, nsPtr, "*", 1); + } + + #ifdef USE_DTRACE /* * Register the tcl::dtrace command. -- cgit v0.12