Index: generic/nsf.c
===================================================================
diff -u -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.
Index: library/mongodb/tests/nx-bi.test
===================================================================
diff -u -ra963e8896fd07c345ccfa034cbd043344edbf083 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- library/mongodb/tests/nx-bi.test	(.../nx-bi.test)	(revision a963e8896fd07c345ccfa034cbd043344edbf083)
+++ library/mongodb/tests/nx-bi.test	(.../nx-bi.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -83,7 +83,7 @@
 # After saving the item, the main object contains an _id, such that a
 # subsequent save operations do not create an additional entries in
 # the database. For our little experiment here, we like to save
-# multiple copies to see the results of our changes. Therefore we
+# multiple copies to see the results of our changes. Therefore, we
 # remove the _id manually:
 $p eval {unset :_id}
 
@@ -103,7 +103,7 @@
 
 # The delete operation does not automatically persist the change,
 # since there might be multiple changes in a complex
-# document. Therefore we have to perform an save operation of the
+# document. Therefore, we have to perform an save operation of the
 # containing document.
 $p save
 
Index: tests/contains.test
===================================================================
diff -u -r2a955681817e4db4776d7ae904babe8053c5ad74 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- tests/contains.test	(.../contains.test)	(revision 2a955681817e4db4776d7ae904babe8053c5ad74)
+++ tests/contains.test	(.../contains.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -156,7 +156,7 @@
 # Test that we do not allow one to mix object systems within the intrinsic
 # classes of an object. Otherwise we would have problems with the
 # recreate "C0 create c0". On a recreate of c0 the object system for
-# C0 is ::xotcl, therefore we try to call recreate. In the C0 class
+# C0 is ::xotcl, therefore, we try to call recreate. In the C0 class
 # hierarchy is from nx and contains no "recreate" method.
 
 ? {catch {::xotcl::Class create C0 -superclass ::nx::Object} errorMsg} 1
Index: tests/disposition.test
===================================================================
diff -u -r8e2e356e9bcef39f43dfe3690b82d9586c7adc72 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- tests/disposition.test	(.../disposition.test)	(revision 8e2e356e9bcef39f43dfe3690b82d9586c7adc72)
+++ tests/disposition.test	(.../disposition.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -1432,7 +1432,7 @@
   
   #
   # When we call configure on the superclass, we do not want the
-  # default to be used to reset it to ::nx::Object. Therefore the
+  # default to be used to reset it to ::nx::Object. Therefore, the
   # configure uses the default for parameters with METHOD_INVOCATION
   # only, when the object is not yet initialized.
   #
Index: tests/method-parameter.test
===================================================================
diff -u -r8e2e356e9bcef39f43dfe3690b82d9586c7adc72 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- tests/method-parameter.test	(.../method-parameter.test)	(revision 8e2e356e9bcef39f43dfe3690b82d9586c7adc72)
+++ tests/method-parameter.test	(.../method-parameter.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -150,7 +150,7 @@
 
   #
   # The argument definition of "pattern" for subclass has
-  # "nodashalnum" option, therefore we can deduce that "-a" must be
+  # "nodashalnum" option, therefore, we can deduce that "-a" must be
   # a flag. OTOH, if "-a" is a proper value (e.g. value of a
   # variable), then the following command would be perfectly fine.
   #
Index: tests/nsf-cmd.test
===================================================================
diff -u -r8e2e356e9bcef39f43dfe3690b82d9586c7adc72 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision 8e2e356e9bcef39f43dfe3690b82d9586c7adc72)
+++ tests/nsf-cmd.test	(.../nsf-cmd.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -490,13 +490,13 @@
   ? {set ::count} 1
 
   #
-  # now we add the debug flag to foo, therefore "foo" will call
+  # now we add the debug flag to foo, therefore, "foo" will call
   # "nsf::log", which might become a infinite recursion loop.
   #
   nsf::proc -debug foo {} {return 1}
 
   #
-  # "foo" is has now "-debug" set, therefore it calls the log function
+  # "foo" is has now "-debug" set, therefore, it calls the log function
   #
   set ::count 0
   ? {foo} "1"
Index: tests/tcl86.test
===================================================================
diff -u -r8e2e356e9bcef39f43dfe3690b82d9586c7adc72 -r9e281d5110f397a9e9b8317325d0675f1793246d
--- tests/tcl86.test	(.../tcl86.test)	(revision 8e2e356e9bcef39f43dfe3690b82d9586c7adc72)
+++ tests/tcl86.test	(.../tcl86.test)	(revision 9e281d5110f397a9e9b8317325d0675f1793246d)
@@ -297,7 +297,7 @@
   ::o foo
   ? {getType @} "bytecode"        ;# "@" is still of type "bytecode"  (byte code compilation should not leak)
 
-  ? {::o foo} ::nx::@             ;# "@" is resolved in the nx context, therefore we get nx::@
+  ? {::o foo} ::nx::@             ;# "@" is resolved in the nx context, therefore, we get nx::@
   
   #
   # 2) Provide alternative @
@@ -317,7 +317,7 @@
   
   ? @ ::@                         ;# proc "?" interprets "@" as a script and turns "@"
                                   ;# into type "bytecode". The proc leaves the nx context
-                                  ;# by using a "namespace eval", therefore we see ::@
+                                  ;# by using a "namespace eval", therefore, we see ::@
   ? {getType @} "bytecode"        ;# "@" is of type "bytecode"
   
   ? {namespace eval :: @} ::@     ;# exercise the same "namespace eval" as described above
@@ -375,7 +375,7 @@
   return ::nx::@
 }
 
-set r [@]       ;# "@" is not executed in an nx environment (no testcase eval), therefore resolved globally
+set r [@]       ;# "@" is not executed in an nx environment (no testcase eval), therefore, resolved globally
 ? {set r} ::@
 if {!$::tcl87} {
     ? {getType @}   "cmdName"
@@ -395,9 +395,9 @@
 
 ? {::o foo} ::nx::@
 
-set r [@]       ;# "@" is not executed in an nx environment (no testcase eval), therefore resolves globally
+set r [@]       ;# "@" is not executed in an nx environment (no testcase eval), therefore, resolves globally
 ? {set r} ::@
-? {@} ::@       ;# "@" is executed in an "namespace eval ::", therefore no nx context
+? {@} ::@       ;# "@" is executed in an "namespace eval ::", therefore, no nx context
 
 # cleanup
 rename ::nx::@ ""