rem: itPtr = NewInterpData(interp);
add: itPtr = NewInterpData(interp, server);
context: CreateInterp(NsInterp **itPtrPtr){    NsInterp *itPtr;    Tcl_Interp *interp;    /*     * Create and initialize a basic Tcl interp.     */    interp = Tcl_CreateInterp();    Tcl_InitMemory(interp);    if (Tcl_Init(interp) != TCL_OK) {	Ns_TclLogError(interp);    }    /*     * Allocate and associate a new NsInterp struct for the interp.     */    itPtr = NewInterpData(interp);    if (itPtrPtr != NULL) {	*itPtrPtr = itPtr;    }    return interp;}