Index: generic/nsf.c
===================================================================
diff -u -r34c49c5a5b485d039577e9b915bde84f8ff35eb0 -r6a3890ea40bf82f2ffea1481aeb80d1e2a4eec47
--- generic/nsf.c	(.../nsf.c)	(revision 34c49c5a5b485d039577e9b915bde84f8ff35eb0)
+++ generic/nsf.c	(.../nsf.c)	(revision 6a3890ea40bf82f2ffea1481aeb80d1e2a4eec47)
@@ -20143,10 +20143,10 @@
       varPtr = TclLookupVar(interp, ObjStr(nameObj), NULL, TCL_LEAVE_ERR_MSG|TCL_PARSE_PART1, "access",
                             /*createPart1*/ 1, /*createPart2*/ 0, &arrayPtr);
       oldValuePtr = varPtr->value.objPtr;
-      INCR_REF_COUNT(valueObj);
+      INCR_REF_COUNT2("SetInstVar", valueObj);
       varPtr->value.objPtr = valueObj;
       if (oldValuePtr != NULL) {
-        DECR_REF_COUNT(oldValuePtr);
+        DECR_REF_COUNT2("SetInstVar", oldValuePtr);
       }
       resultObj = valueObj;
     }