diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-04-12 14:25:41 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2023-04-12 14:25:41 (GMT) |
commit | b77f43bb1120210cb1cbb467f8a29ab1cb004162 (patch) | |
tree | 0854fb4160c59caca2e4ce994f245d75ca52eb7d /generic/tclCompCmds.c | |
parent | 3d91df248993bec5f3545fa327bf6baef9968331 (diff) | |
parent | 83677a47e7b79ee7a64d2053ed2871b850898a2e (diff) | |
download | tcl-b77f43bb1120210cb1cbb467f8a29ab1cb004162.zip tcl-b77f43bb1120210cb1cbb467f8a29ab1cb004162.tar.gz tcl-b77f43bb1120210cb1cbb467f8a29ab1cb004162.tar.bz2 |
Correct spelling errors in comments and documentation, but also a non-comment corrections in history.tcl and tcltest.test.
Diffstat (limited to 'generic/tclCompCmds.c')
-rw-r--r-- | generic/tclCompCmds.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclCompCmds.c b/generic/tclCompCmds.c index 3a61a94..000921b 100644 --- a/generic/tclCompCmds.c +++ b/generic/tclCompCmds.c @@ -230,7 +230,7 @@ TclCompileAppendCmd( * * TclCompileArray*Cmd -- * - * Functions called to compile "array" sucommands. + * Functions called to compile "array" subcommands. * * Results: * All return TCL_OK for a successful compile, and TCL_ERROR to defer @@ -635,7 +635,7 @@ TclCompileCatchCmd( * catch range so that errors in the substitution are not caught. * [Bug 219184] * The reason for duplicating the script is that EVAL_STK would otherwise - * begin by undeflowing the stack below the mark set by BEGIN_CATCH4. + * begin by underflowing the stack below the mark set by BEGIN_CATCH4. */ range = TclCreateExceptRange(CATCH_EXCEPTION_RANGE, envPtr); @@ -983,7 +983,7 @@ TclCompileContinueCmd( * * TclCompileDict*Cmd -- * - * Functions called to compile "dict" sucommands. + * Functions called to compile "dict" subcommands. * * Results: * All return TCL_OK for a successful compile, and TCL_ERROR to defer @@ -1690,7 +1690,7 @@ CompileDictEachCmd( /* * Error handler "finally" clause, which force-terminates the iteration - * and rethrows the error. + * and re-throws the error. */ TclAdjustStackDepth(-1, envPtr); @@ -1862,7 +1862,7 @@ TclCompileDictUpdateCmd( /* * Termination code for non-ok returns: stash the result and return * options in the stack, bring up the key list, finish the update code, - * and finally return with the catched return data + * and finally return with the caught return data */ ExceptionRangeTarget(envPtr, range, catchOffset); @@ -1908,7 +1908,7 @@ TclCompileDictAppendCmd( /* * There must be at least two argument after the command. And we impose an - * (arbirary) safe limit; anyone exceeding it should stop worrying about + * (arbitrary) safe limit; anyone exceeding it should stop worrying about * speed quite so much. ;-) */ |