Index: generic/nsf.c =================================================================== diff -u -ra6e4b1ad5d61bd76e911cfac041c2b9fa7194c7d -rfc14b0585b7bc414e38a6d56658e6af05f21768d --- generic/nsf.c (.../nsf.c) (revision a6e4b1ad5d61bd76e911cfac041c2b9fa7194c7d) +++ generic/nsf.c (.../nsf.c) (revision fc14b0585b7bc414e38a6d56658e6af05f21768d) @@ -21286,10 +21286,10 @@ Tcl_SetObjResult(interp, savedResultObj); /* restore the result */ DECR_REF_COUNT(savedResultObj); } - DECR_REF_COUNT(objPtr); } else { - /*fprintf(stderr, "omitting destroy on %s %p\n", name);*/ + /* fprintf(stderr, "omitting destroy\n"); */ } + DECR_REF_COUNT2("volatile", objPtr); return resultMsg; } @@ -33030,7 +33030,7 @@ CallStackRestoreSavedFrames(interp, &ctx); if (likely(result == TCL_OK)) { - INCR_REF_COUNT(objPtr); + INCR_REF_COUNT2("volatile", objPtr); } return result; }