Index: generic/nsf.c
===================================================================
diff -u -rb69745e3ecfe9e95e9a48ce240c9837117050e6c -r0f5513cd0b35c79689a0d04b967ea340577889e8
--- generic/nsf.c	(.../nsf.c)	(revision b69745e3ecfe9e95e9a48ce240c9837117050e6c)
+++ generic/nsf.c	(.../nsf.c)	(revision 0f5513cd0b35c79689a0d04b967ea340577889e8)
@@ -241,7 +241,7 @@
 /* prototypes for call stack specific calls */
 NSF_INLINE static void CscInit(NsfCallStackContent *cscPtr, NsfObject *object, NsfClass *cl,
 			       Tcl_Command cmd, int frameType, int flags);
-NSF_INLINE static void CscFinish(Tcl_Interp *interp, NsfCallStackContent *cscPtr /*, char *string*/);
+NSF_INLINE static void CscFinish_(Tcl_Interp *interp, NsfCallStackContent *cscPtr);
 NSF_INLINE static void CallStackDoDestroy(Tcl_Interp *interp, NsfObject *object);
 
 /* prototypes for  parameter and argument management */
@@ -6380,7 +6380,7 @@
     result = ObjectDispatchFinalize(interp, cscPtr, result /*, "NRE" , methodName*/);
 #endif
 
-    CscFinish(interp, cscPtr /*, "scripted finalize"*/);
+    CscFinish(interp, cscPtr, "scripted finalize");
   }
 
   return result;
@@ -6466,7 +6466,7 @@
 	 */
 #if defined(NRE)
 	//CscListRemove(interp, cscPtr);
-	CscFinish(interp, cscPtr /*, "guard failed"*/);
+	CscFinish(interp, cscPtr, "guard failed");
 #endif
 	return result;
       }
@@ -6541,7 +6541,7 @@
 #endif
   } else /* result != OK */ {
 #if defined(NRE)
-    CscFinish(interp, cscPtr /*, "nre, prep failed"*/);
+    CscFinish(interp, cscPtr, "nre, prep failed");
 #endif
   }
 
@@ -6880,11 +6880,11 @@
 #if defined(NRE)
   if ((cscPtr->flags & NSF_CSC_CALL_IS_NRE) == 0) {
     CscListRemove(interp, cscPtr);
-    CscFinish(interp, cscPtr /*, "csc cleanup"*/);
+    CscFinish(interp, cscPtr, "csc cleanup");
   }
 #else
   CscListRemove(interp, cscPtr);
-  CscFinish(interp, cscPtr /*, "csc cleanup" */);
+  CscFinish(interp, cscPtr, "csc cleanup");
 #endif
 
   return result;
@@ -7233,7 +7233,7 @@
   if (!(cscPtr->flags & NSF_CSC_CALL_IS_NRE)) {
     result = ObjectDispatchFinalize(interp, cscPtr, result /*, "immediate" , methodName*/);
     CscListRemove(interp, cscPtr);
-    CscFinish(interp, cscPtr /*, "non-scripted finalize"*/);
+    CscFinish(interp, cscPtr, "non-scripted finalize");
   }
 
   /*fprintf(stderr, "ObjectDispatch %s.%s returns %d\n",
@@ -14772,7 +14772,7 @@
       */
       Nsf_PopFrameCsc(interp, framePtr2);
       CscListRemove(interp, cscPtr);
-      CscFinish(interp, cscPtr /*, "converter object frame"*/);
+      CscFinish(interp, cscPtr, "converter object frame");
       Tcl_Interp_varFramePtr(interp) = varFramePtr;
 
       /*fprintf(stderr, "NsfOConfigureMethod_ attribute %s evaluated %s => (%d)\n",