summaryrefslogtreecommitdiffstats
path: root/generic/tclParse.c
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2011-03-10 09:31:57 (GMT)
committerdkf <dkf@noemail.net>2011-03-10 09:31:57 (GMT)
commit6e96455cbb30c6c8811a0ff346039ed8cda3b6a9 (patch)
treeb74fbaf07478b3a916755023109d8257208cc5f0 /generic/tclParse.c
parentadd492f5bdf280226f846665b3f671d44cc0ace9 (diff)
downloadtcl-6e96455cbb30c6c8811a0ff346039ed8cda3b6a9.zip
tcl-6e96455cbb30c6c8811a0ff346039ed8cda3b6a9.tar.gz
tcl-6e96455cbb30c6c8811a0ff346039ed8cda3b6a9.tar.bz2
MINOR: Formatting fixes, mainly to comments, so code better fits the style in
the Engineering Manual. FossilOrigin-Name: 5cb634a1c1fc60d754c5b98a3d8760b06f21e777
Diffstat (limited to 'generic/tclParse.c')
-rw-r--r--generic/tclParse.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/generic/tclParse.c b/generic/tclParse.c
index 705a141..ff7cdd6 100644
--- a/generic/tclParse.c
+++ b/generic/tclParse.c
@@ -479,11 +479,11 @@ Tcl_ParseCommand(
if ((code != TCL_OK) || nakedbs) {
/*
- * Some list element could not be parsed, or contained
- * naked backslashes. This means the literal string was
- * not in fact a valid nor canonical list. Defer the
- * handling of this to compile/eval time, where code is
- * already in place to report the "attempt to expand a
+ * Some list element could not be parsed, or contained
+ * naked backslashes. This means the literal string was
+ * not in fact a valid nor canonical list. Defer the
+ * handling of this to compile/eval time, where code is
+ * already in place to report the "attempt to expand a
* non-list" error or expand lists that require
* substitution.
*/
@@ -1103,7 +1103,7 @@ ParseTokens(
}
/*
- * This is a variable reference. Call Tcl_ParseVarName to do all
+ * This is a variable reference. Call Tcl_ParseVarName to do all
* the dirty work of parsing the name.
*/
@@ -1127,7 +1127,7 @@ ParseTokens(
}
/*
- * Command substitution. Call Tcl_ParseCommand recursively (and
+ * Command substitution. Call Tcl_ParseCommand recursively (and
* repeatedly) to parse the nested command(s), then throw away the
* parse information.
*/
@@ -1875,10 +1875,10 @@ Tcl_ParseQuotedString(
* None.
*
* Side effects:
-
* The Tcl_Parse struct '*parsePtr' is filled with parse results.
* The caller is expected to eventually call Tcl_FreeParse() to properly
* cleanup the value written there.
+ *
* If a parse error occurs, the Tcl_InterpState value '*statePtr' is
* filled with the state created by that error. When *statePtr is written
* to, the caller is expected to make the required calls to either