Index: generic/nsfProfile.c =================================================================== diff -u -N -r2771c4c7e0b56fe2a6cde84fdae9b170ff652928 -re367957430bf9246069791785619a5503e166d33 --- generic/nsfProfile.c (.../nsfProfile.c) (revision 2771c4c7e0b56fe2a6cde84fdae9b170ff652928) +++ generic/nsfProfile.c (.../nsfProfile.c) (revision e367957430bf9246069791785619a5503e166d33) @@ -169,7 +169,7 @@ Nsf_DStringPrintf(&ds, " {%s}", ObjStr(listObj)); DECR_REF_COUNT(listObj); - NsfDStringEval(interp, &ds, "debug call", 1, 1); + NsfDStringEval(interp, &ds, "debug call", (NSF_EVAL_DEBUG|NSF_EVAL_SAVE|NSF_EVAL_NOPROFILE)); Tcl_DStringFree(&ds); @@ -205,7 +205,7 @@ Tcl_DStringAppend(dsPtr, " {}", 4); } - NsfDStringEval(interp, &ds, "debug exit", 1, 1); + NsfDStringEval(interp, &ds, "debug exit", (NSF_EVAL_DEBUG|NSF_EVAL_SAVE|NSF_EVAL_NOPROFILE)); Tcl_DStringFree(dsPtr); rst->debugCallingDepth--;