summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2024-03-19 17:09:30 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2024-03-19 17:09:30 (GMT)
commita72c1f969cba896ca61001393f0f7b74fb52e194 (patch)
treee6fdb6985952e104004323a8b1172733b8f33abf /generic/tclProc.c
parent1f9225ecf514564b9994b7747fbdc7852a321dfa (diff)
downloadtcl-a72c1f969cba896ca61001393f0f7b74fb52e194.zip
tcl-a72c1f969cba896ca61001393f0f7b74fb52e194.tar.gz
tcl-a72c1f969cba896ca61001393f0f7b74fb52e194.tar.bz2
more spacing/formatting tweaks
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index 419b9eb..ebd7681 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -559,9 +559,9 @@ TclCreateProc(
"FORMALARGUMENTFORMAT", (void *)NULL);
goto procError;
}
- } else if (*argnamei == ':' && *(argnamei+1) == ':') {
+ } else if (argnamei[0] == ':' && argnamei[1] == ':') {
Tcl_Obj *errorObj = Tcl_NewStringObj(
- "formal parameter \"", -1);
+ "formal parameter \"", -1);
Tcl_AppendObjToObj(errorObj, fieldValues[0]);
Tcl_AppendToObj(errorObj, "\" is not a simple name", -1);
Tcl_SetObjResult(interp, errorObj);
@@ -2592,7 +2592,7 @@ SetLambdaFromAny(
} else {
const char *nsName = TclGetString(objv[2]);
- if ((*nsName != ':') || (*(nsName+1) != ':')) {
+ if ((nsName[0] != ':') || (nsName[1] != ':')) {
TclNewLiteralStringObj(nsObjPtr, "::");
Tcl_AppendObjToObj(nsObjPtr, objv[2]);
} else {