rem: Tcl_HashTable *tablePtr; int ignored;
add: TclData *dataPtr = GetData(); int new;
context: GetCacheEntry(NsServer *servPtr){    Tcl_HashTable *tablePtr;    int ignored;    tablePtr = Ns_TlsGet(&tls);    if (tablePtr == NULL) {	tablePtr = ns_malloc(sizeof(Tcl_HashTable));	Tcl_InitHashTable(tablePtr, TCL_ONE_WORD_KEYS);	Ns_TlsSet(&tls, tablePtr);    }    return Tcl_CreateHashEntry(tablePtr, (char *) servPtr, &ignored);}