Index: generic/nsf.c
===================================================================
diff -u -rb9a25a66a1e81fe208cac08f93c12b23eacc6ecd -rb69745e3ecfe9e95e9a48ce240c9837117050e6c
--- generic/nsf.c	(.../nsf.c)	(revision b9a25a66a1e81fe208cac08f93c12b23eacc6ecd)
+++ generic/nsf.c	(.../nsf.c)	(revision b69745e3ecfe9e95e9a48ce240c9837117050e6c)
@@ -209,7 +209,7 @@
 static void PrimitiveCDestroy(ClientData clientData);
 static void PrimitiveODestroy(ClientData clientData);
 static void PrimitiveDestroy(ClientData clientData);
-static void NsfCleanupObject(NsfObject *object, char *string);
+static void NsfCleanupObject_(NsfObject *object);
 
 /* prototypes for object and command lookup */
 static NsfObject *GetObjectFromString(Tcl_Interp *interp, CONST char *name);
@@ -548,11 +548,10 @@
   return nsPtr ? nsPtr->fullName : "";
 }
 
-// TODO: remove string
 static void
-NsfCleanupObject(NsfObject *object, char *string) {
+NsfCleanupObject_(NsfObject *object) {
   NsfObjectRefCountDecr(object);
-  /* fprintf(stderr, "obj refCount of %p after decr %d (%s)\n",object,object->refCount, string);*/
+  /* fprintf(stderr, "obj refCount of %p after decr %d\n",object,object->refCount);*/
 
   if (object->refCount <= 0) {
     /*fprintf(stderr, "NsfCleanupObject %p refcount %d\n", object, object->refCount);*/