Add a call to Tcl_Init() in tclsqlite3's setup. This activates many of the otherwise-missing Tcl standard commands and is believed to be benign on systems where those cannot be loaded, but whether it truly is requires some experimentation on affected systems.

FossilOrigin-Name: 9eb5c91c897f8820affb30f8571eb927423c7831161f5df0043715e7f0a729d7

src/tclsqlite.c

@@ -4190,6 +4190,7 @@ int SQLITE_CDECL TCLSH_MAIN(int argc, char **argv){
   Tcl_SetSystemEncoding(NULL, "utf-8");
   interp = Tcl_CreateInterp();
   Sqlite3_Init(interp);
+  Tcl_Init(interp);
 
   sqlite3_snprintf(sizeof(zArgc), zArgc, "%d", argc-1);
   Tcl_SetVar(interp,"argc", zArgc, TCL_GLOBAL_ONLY);