Index: generic/nsf.c =================================================================== diff -u -N -r5a44ade20d030bbe3fc3b19b0edc226e5d5e8c1b -re234956359b0a1ddeaf85f2b0989336b68fd6998 --- generic/nsf.c (.../nsf.c) (revision 5a44ade20d030bbe3fc3b19b0edc226e5d5e8c1b) +++ generic/nsf.c (.../nsf.c) (revision e234956359b0a1ddeaf85f2b0989336b68fd6998) @@ -20986,10 +20986,10 @@ nonnull_assert(clientData != NULL); nonnull_assert(interp != NULL); - /*fprintf(stderr, "NsfUnsetTrace %s flags %.4x %.4x\n", name, flags, - flags & TCL_INTERP_DESTROYED);*/ + /*fprintf(stderr, "NsfUnsetTrace %s flags %.4x deleted %d\n", name, flags, + Tcl_InterpDeleted(interp));*/ - if ((flags & TCL_INTERP_DESTROYED) == 0u) { + if (Tcl_InterpDeleted(interp) == 0) { if (GetObjectFromObj(interp, objPtr, &object) == TCL_OK) { Tcl_Obj *savedResultObj = Tcl_GetObjResult(interp); /* save the result */