Index: generic/nsf.c
===================================================================
diff -u -rf34be2f016a50e3f5fc8b1b021e28fb696bdb5de -rb55e632513d041baec1da37ce4d46b7fdf539bb5
--- generic/nsf.c	(.../nsf.c)	(revision f34be2f016a50e3f5fc8b1b021e28fb696bdb5de)
+++ generic/nsf.c	(.../nsf.c)	(revision b55e632513d041baec1da37ce4d46b7fdf539bb5)
@@ -4910,8 +4910,23 @@
 }
 
 /*
- * remove all command pointers from a list that have a bumped epoch
+ *----------------------------------------------------------------------
+ * CmdListRemoveDeleted --
+ *
+ *    Remove all command pointers from a command list which are marked
+ *    "deleted". The condition for deletion is the presence of the flag
+ *    CMD_IS_DELETED, with the flag bit being set by
+ *    Tcl_DeleteCommandFromToken().
+ *
+ * Results:
+ *    The cmd list filtered for non-deleted commands
+ *
+ * Side effects:
+ *    None
+ *
+ *----------------------------------------------------------------------
  */
+
 static void
 CmdListRemoveDeleted(INTERP_DECL NsfCmdList **cmdList, NsfFreeCmdListClientData *freeFct) {
   NsfCmdList *f = *cmdList, *del;