rem: (Tcl_EvalObjEx(interp, objPtr, 0) != TCL_OK) ) {
add: (Tcl_EvalObjEx(interp, objPtr, TCL_EVAL_DIRECT | TCL_EVAL_GLOBAL) != TCL_OK) ) {
context: TclInitScriptCB(Tcl_Interp *interp, void *arg){    Tcl_Obj *objPtr = (Tcl_Obj *)arg;    int status = NS_OK;    if( (objPtr != NULL) &&        (Tcl_EvalObjEx(interp, objPtr, 0) != TCL_OK) ) {        status = NS_ERROR;    }    return status;}