Fix typos in comments.

7 files changed, 8 insertions, 8 deletions

diff --git a/src/insdel.c b/src/insdel.c
index f94f4f0067b..eaf899c8a0e 100644
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -199,7 +199,7 @@ gap_left (EMACS_INT charpos, EMACS_INT bytepos, int newgap)
   QUIT;
 }
 
-/* Move the gap to a position greater than than the current GPT.
+/* Move the gap to a position greater than the current GPT.
    BYTEPOS describes the new position as a byte position,
    and CHARPOS is the corresponding char position.  */
 
diff --git a/src/regex.c b/src/regex.c
index 91259dc7794..944ef4e0b66 100644
--- a/src/regex.c
+++ b/src/regex.c
@@ -2400,7 +2400,7 @@ set_image_of_range_1 (work_area, start, end, translate)
 
 #endif /* emacs */
 
-/* Record the the image of the range start..end when passed through
+/* Record the image of the range start..end when passed through
    TRANSLATE.  This is not necessarily TRANSLATE(start)..TRANSLATE(end)
    and is not even necessarily contiguous.
    Normally we approximate it with the smallest contiguous range that contains
diff --git a/src/syntax.c b/src/syntax.c
index 6fa20c458ba..d84e62ea257 100644
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -341,7 +341,7 @@ dec_bytepos (bytepos)
   return bytepos;
 }
 
-/* Return a defun-start position before before POS and not too far before.
+/* Return a defun-start position before POS and not too far before.
    It should be the last one before POS, or nearly the last.
 
    When open_paren_in_column_0_is_defun_start is nonzero,
diff --git a/src/term.c b/src/term.c
index 0d0095785e3..d5855b4cbf6 100644
--- a/src/term.c
+++ b/src/term.c
@@ -1808,8 +1808,8 @@ append_composite_glyph (it)
 
 /* Produce a composite glyph for iterator IT.  IT->cmp_id is the ID of
    the composition.  We simply produces components of the composition
-   assuming that that the terminal has a capability to layout/render
-   it correctly.  */
+   assuming that the terminal has a capability to layout/render it
+   correctly.  */
 
 static void
 produce_composite_glyph (it)
diff --git a/src/unexec.c b/src/unexec.c
index 676197b77b3..a6852af7d07 100644
--- a/src/unexec.c
+++ b/src/unexec.c
@@ -498,7 +498,7 @@ write_segment (new, ptr, end)
           )
         {
           /* Write only a page of zeros at once,
-             so that we we don't overshoot the start
+             so that we don't overshoot the start
              of the valid memory in the old data segment.  */
           if (nwrite > pagesize)
             nwrite = pagesize;
diff --git a/src/xdisp.c b/src/xdisp.c
index 017d4ce86fd..07a2127b2d3 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -22711,7 +22711,7 @@ x_update_cursor (f, on_p)
 /* EXPORT:
    Clear the cursor of window W to background color, and mark the
    cursor as not shown.  This is used when the text where the cursor
-   is is about to be rewritten.  */
+   is about to be rewritten.  */
 
 void
 x_clear_cursor (w)
diff --git a/src/xfns.c b/src/xfns.c
index 49a9c50f160..87ff21b7759 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -2953,7 +2953,7 @@ x_make_gc (f)
 }
 
 
-/* Free what was was allocated in x_make_gc.  */
+/* Free what was allocated in x_make_gc.  */
 
 void
 x_free_gcs (f)