Attachment "e646d28f1a.diff" to
ticket [e646d28f1a]
added by
chrstphrchvz
2024-02-16 12:33:14.
diff --git doc/ParseCmd.3 doc/ParseCmd.3
index 40a08185c8..3b80d2a084 100644
--- doc/ParseCmd.3
+++ doc/ParseCmd.3
@@ -159,7 +159,7 @@ occurs while parsing the command then \fBTCL_ERROR\fR is returned, an
error message is left in \fIinterp\fR's result (if \fIinterp\fR is not
NULL), and no information is left at \fI*parsePtr\fR.
.PP
-\fBTcl_ParseVar\fR parse a Tcl variable reference such as \fB$abc\fR
+\fBTcl_ParseVar\fR parses a Tcl variable reference such as \fB$abc\fR
or \fB$x([expr {$index + 1}])\fR from the beginning of its \fIstart\fR
argument. The first character of \fIstart\fR must be \fB$\fR. If
the variable name is parsed successfully, \fBTcl_ParseVar\fR returns a
diff --git generic/tclNotify.c generic/tclNotify.c
index 3dbc58bf03..1d750c4d7c 100644
--- generic/tclNotify.c
+++ generic/tclNotify.c
@@ -1040,7 +1040,7 @@ Tcl_ServiceAll(void)
}
/*
- * We need to turn off event servicing like we to in Tcl_DoOneEvent, to
+ * We need to turn off event servicing like we do in Tcl_DoOneEvent, to
* avoid recursive calls.
*/
diff --git generic/tclOO.c generic/tclOO.c
index 4efdd9e5f7..86c40871cc 100644
--- generic/tclOO.c
+++ generic/tclOO.c
@@ -403,7 +403,7 @@ InitFoundation(
fPtr->objectCls = TclOOAllocClass(interp,
AllocObject(interp, "object", (Namespace *)fPtr->ooNs, NULL));
/*
- * Corresponding TclOODecrRefCount in KillFoudation.
+ * Corresponding TclOODecrRefCount in KillFoundation.
*/
AddRef(fPtr->objectCls->thisPtr);
@@ -429,7 +429,7 @@ InitFoundation(
AllocObject(interp, "class", (Namespace *)fPtr->ooNs, NULL));
/*
- * Corresponding TclOODecrRefCount in KillFoudation.
+ * Corresponding TclOODecrRefCount in KillFoundation.
*/
AddRef(fPtr->classCls->thisPtr);
diff --git generic/tclPkg.c generic/tclPkg.c
index ec932f1ca7..461c343b82 100644
--- generic/tclPkg.c
+++ generic/tclPkg.c
@@ -1430,7 +1430,7 @@ CheckVersionAndConvert(
int hasunstable = 0;
/*
* 4* assuming that each char is a separator (a,b become ' -x ').
- * 4+ to have spce for an additional -2 at the end
+ * 4+ to have space for an additional -2 at the end
*/
char *ibuf = ckalloc(4 + 4*strlen(string));
char *ip = ibuf;
diff --git tests/cmdMZ.test tests/cmdMZ.test
index 66213f9844..ff6efaa13d 100644
--- tests/cmdMZ.test
+++ tests/cmdMZ.test
@@ -405,7 +405,7 @@ test cmdMZ-6.5a {Tcl_TimeRateObjCmd: result format and one iteration} {
test cmdMZ-6.5b {Tcl_TimeRateObjCmd: result format without iterations} {
regexp {^0 \ws/# 0 # 0 #/sec 0 net-ms$} [timerate {} 0 0]
} 1
-test cmdMZ-6.6 {Tcl_TimeRateObjCmd: slower commands take longer, but it remains almost the same time of measument} -body {
+test cmdMZ-6.6 {Tcl_TimeRateObjCmd: slower commands take longer, but it remains almost the same time of measurement} -body {
set m1 [timerate {_nrt_sleep 0.01} 50]
set m2 [timerate {_nrt_sleep 1.00} 50]
list [list \
diff --git tests/nre.test tests/nre.test
index 7cf06d1617..2027839994 100644
--- tests/nre.test
+++ tests/nre.test
@@ -1,4 +1,4 @@
-# Commands covered: proc, apply, [interp alias], [namespce import]
+# Commands covered: proc, apply, [interp alias], [namespace import]
#
# This file contains a collection of tests for the non-recursive executor that
# avoids recursive calls to TEBC. Only the NRE behaviour is tested here, the
