rem: Ns_TlsAlloc(&tls, DeleteInterps); Tcl_InitHashTable(&interps, TCL_STRING_KEYS); Ns_MutexSetName(&ilock, "ns:interps");
add: Ns_TlsAlloc(&tls, DeleteData);    Tcl_InitHashTable(&threads, TCL_ONE_WORD_KEYS); Ns_MutexSetName(&lock, "ns:threads");
context: NsInitTcl(void){    /*     * Allocate the thread storage slot for the table of interps     * per-thread. At thread exit, DeleteInterps will be called     * to free any interps remaining on the thread cache.     */    Ns_TlsAlloc(&tls, DeleteInterps);    Tcl_InitHashTable(&interps, TCL_STRING_KEYS);    Ns_MutexSetName(&ilock, "ns:interps");}