summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-05-11 07:39:02 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-05-11 07:39:02 (GMT)
commit429a4171cb6436a84c7923dcac6ef6fe3460ce20 (patch)
tree022cb40236b73c52c77cb797eb57db6e550d52a6 /generic
parent0733f232745ac3cc9a3bd4913bd5ffb8b58378a5 (diff)
downloadtcl-429a4171cb6436a84c7923dcac6ef6fe3460ce20.zip
tcl-429a4171cb6436a84c7923dcac6ef6fe3460ce20.tar.gz
tcl-429a4171cb6436a84c7923dcac6ef6fe3460ce20.tar.bz2
occurance -> occurrence.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclCmdIL.c4
-rw-r--r--generic/tclFileName.c2
-rw-r--r--generic/tclUtf.c6
3 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c
index 3ec1c09..e97d495 100644
--- a/generic/tclCmdIL.c
+++ b/generic/tclCmdIL.c
@@ -3328,11 +3328,11 @@ Tcl_LsearchObjCmd(
/*
* Normally, binary search is written to stop when it finds a
* match. If there are duplicates of an element in the list,
- * our first match might not be the first occurance.
+ * our first match might not be the first occurrence.
* Consider: 0 0 0 1 1 1 2 2 2
*
* To maintain consistancy with standard lsearch semantics, we
- * must find the leftmost occurance of the pattern in the
+ * must find the leftmost occurrence of the pattern in the
* list. Thus we don't just stop searching here. This
* variation means that a search always makes log n
* comparisons (normal binary search might "get lucky" with an
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index 7afcdaf..8fb9f4d 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.c
@@ -2058,7 +2058,7 @@ TclGlob(
* SkipToChar --
*
* This function traverses a glob pattern looking for the next unquoted
- * occurance of the specified character at the same braces nesting level.
+ * occurrence of the specified character at the same braces nesting level.
*
* Results:
* Updates stringPtr to point to the matching character, or to the end of
diff --git a/generic/tclUtf.c b/generic/tclUtf.c
index 5e0b2e0..a6dfb8a 100644
--- a/generic/tclUtf.c
+++ b/generic/tclUtf.c
@@ -653,7 +653,7 @@ Tcl_NumUtfChars(
src += TclUtfToUniChar(src, &ch);
} else {
/*
- * src points to incomplete UTF-8 sequence
+ * src points to incomplete UTF-8 sequence
* Treat first byte as character and count it
*/
src++;
@@ -669,7 +669,7 @@ Tcl_NumUtfChars(
*
* Tcl_UtfFindFirst --
*
- * Returns a pointer to the first occurance of the given Unicode character
+ * Returns a pointer to the first occurrence of the given Unicode character
* in the NULL-terminated UTF-8 string. The NULL terminator is considered
* part of the UTF-8 string. Equivalent to Plan 9 utfrune().
*
@@ -706,7 +706,7 @@ Tcl_UtfFindFirst(
*
* Tcl_UtfFindLast --
*
- * Returns a pointer to the last occurance of the given Unicode character
+ * Returns a pointer to the last occurrence of the given Unicode character
* in the NULL-terminated UTF-8 string. The NULL terminator is considered
* part of the UTF-8 string. Equivalent to Plan 9 utfrrune().
*