Index: generic/nsf.c
===================================================================
diff -u -N -r3493340e8f789789b29a8823333acfb82d244a73 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- generic/nsf.c	(.../nsf.c)	(revision 3493340e8f789789b29a8823333acfb82d244a73)
+++ generic/nsf.c	(.../nsf.c)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -5357,7 +5357,7 @@
 #endif
   if (*varPtr == NULL) {
     /*
-     * We failed to find the variable so far, therefore we create it
+     * We failed to find the variable so far, therefore, we create it
      * in this var table.  Note that in several cases above,
      * TCL_CONTINUE takes care for variable creation.
      */
@@ -5854,7 +5854,7 @@
     assert(1);
   } else {
     /*
-     * We failed to find the variable, therefore we create it new
+     * We failed to find the variable, therefore, we create it new
      */
     var = (Tcl_Var)VarHashCreateVar(varTablePtr, keyObj, &new);
 #if defined(VAR_RESOLVER_TRACE)
@@ -6457,7 +6457,7 @@
 
   /*
    * A destroy of one element of the hash-table can trigger the
-   * destroy of another item of the same table. Therefore we use
+   * destroy of another item of the same table. Therefore, we use
    * Nsf_NextHashEntry(), which handles this case.
    */
   for (hPtr = Tcl_FirstHashEntry(cmdTablePtr, &hSrch);
@@ -10277,7 +10277,7 @@
       ((cmdFlags & NSF_CMD_CLASS_ONLY_METHOD) != 0u && !NsfObjectIsClass(object))) {
     /*
      * The command is not applicable for objects (i.e. might crash,
-     * since it expects a class record); therefore skip it
+     * since it expects a class record); therefore, skip it
      */
     return NSF_CHECK_FAILED;
   }
@@ -19681,7 +19681,7 @@
 
     if (!isAbsolutePath(nameString)) {
       tcd->cmdName = NameInNamespaceObj(nameString, CallingNameSpace(interp));
-      /*fprintf(stderr, "+++ name %s not absolute, therefore qualifying %s\n", nameString,
+      /*fprintf(stderr, "+++ name %s not absolute, therefore, qualifying %s\n", nameString,
         ObjStr(tcd->cmdName));*/
     }
   }
@@ -23435,7 +23435,7 @@
 
   } else if (tcd->args == NULL && *(ObjStr(tcd->cmdName)) != '%') {
     /*
-     * We have no args, therefore we have only to replace the method name
+     * We have no args, therefore, we have only to replace the method name
      * with the given cmd name.
      */
     ALLOC_ON_STACK(Tcl_Obj*, objc, ov);
@@ -30054,7 +30054,7 @@
 #endif
 
   /*
-   * During shutdown, no new objects are created, therefore we do not need to
+   * During shutdown, no new objects are created, therefore, we do not need to
    * to invalidate the cached parsedParamPtr of the classes.
    */
   if (unlikely(RUNTIME_STATE(interp)->exitHandlerDestroyRound == NSF_EXITHANDLER_OFF)) {
@@ -30847,7 +30847,7 @@
 
   case CurrentoptionLevelIdx:
     /*
-     * We have an "object", therefore we are on an NSF-frame/level. In this
+     * We have an "object", therefore, we are on an NSF-frame/level. In this
      * case, "nsf level" behaves like "info level" (without arguments).
      */
     Tcl_SetObjResult(interp, Tcl_NewIntObj(Tcl_CallFrame_level(Tcl_Interp_varFramePtr(interp))));
@@ -32581,15 +32581,15 @@
 
   if (objc % 2 == 0) {
     /*
-     * Even number of arguments (including method), therefore the level
+     * Even number of arguments (including method), therefore, the level
      * specifier is considered to be the first argument.
      */
     frameInfoObj = NULL;
     frameInfo = ObjStr(objv[1]);
     i = 2;
   } else {
     /*
-     * Odd number of arguments (including method), therefore the level
+     * Odd number of arguments (including method), therefore, the level
      * specifier considered absent and the level has to be computed.
      */
     frameInfoObj = ComputeLevelObj(interp, CALLING_LEVEL);
@@ -34940,7 +34940,7 @@
  *
  * FreeAllNsfObjectsAndClasses --
  *
- *      Destroy and free all objects and classes defined int the interp.
+ *      Destroy and free all objects and classes defined in the interp.
  *
  * Results:
  *      None.