; Fix doc typos related to indefinite articles

diff --git a/src/character.c b/src/character.c
index fa817a503172a9ca311edeb738b64c72af830c97..deac1fa22ec5c6c34c95e096b5eef29cab8fdaa7 100644 (file)
--- a/src/character.c
+++ b/src/character.c
@@ -983,7 +983,7 @@ alphabeticp (int c)
          || gen_cat == UNICODE_CATEGORY_Nl);
 }
 
-/* Return true if C is a alphabetic or decimal-number character.  */
+/* Return true if C is an alphabetic or decimal-number character.  */
 bool
 alphanumericp (int c)
 {

diff --git a/src/character.h b/src/character.h
index c716885d46b8dc0700a61dc46f3758804a2e7196..1f21b2ad330e743c440fd4c6e9df5ddbbffead0e 100644 (file)
--- a/src/character.h
+++ b/src/character.h
@@ -693,7 +693,7 @@ INLINE int
 char_table_translate (Lisp_Object obj, int ch)
 {
   /* This internal function is expected to be called with valid arguments,
-     so there is a eassert instead of CHECK_xxx for the sake of speed.  */
+     so there is an eassert instead of CHECK_xxx for the sake of speed.  */
   eassert (CHAR_VALID_P (ch));
   eassert (CHAR_TABLE_P (obj));
   obj = CHAR_TABLE_REF (obj, ch);

diff --git a/src/charset.c b/src/charset.c
index cc61300b6bd95f5e96ece324bfe0332d4abca319..05290e86b4ea2bd9776162eb8f9826c54ae77fa5 100644 (file)
--- a/src/charset.c
+++ b/src/charset.c
@@ -2332,7 +2332,7 @@ init_charset_once (void)
    Don't make the value so small that the table is reallocated during
    bootstrapping, as glibc malloc calls larger than just under 64 KiB
    during an initial bootstrap wreak havoc after dumping; see the
-   M_MMAP_THRESHOLD value in alloc.c, plus there is a extra overhead
+   M_MMAP_THRESHOLD value in alloc.c, plus there is an extra overhead
    internal to glibc malloc and perhaps to Emacs malloc debugging.  */
 static struct charset charset_table_init[180];
 

diff --git a/src/coding.c b/src/coding.c
index a7b040e271277a982134a9202028e55a1ebe6b5a..582b9268dbf83841432249a2063ca8fa9f9bc863 100644 (file)
--- a/src/coding.c
+++ b/src/coding.c
@@ -252,7 +252,7 @@ decode_coding_XXXX (struct coding_system *coding)
   CODING_RESULT_XXX indicating how the encoding finished.
 
   DST_BYTES zero means that source area and destination area are
-  overlapped, which means that we can produce a encoded text until it
+  overlapped, which means that we can produce an encoded text until it
   reaches at the head of not-yet-encoded source text.
 
   Below is a template of these functions.  */

diff --git a/src/dbusbind.c b/src/dbusbind.c
index 63dda583529e5d130bc0bd54dabc3290d2241167..ec3707d18f31a707f2093acab1f5ce93c59fbe51 100644 (file)
--- a/src/dbusbind.c
+++ b/src/dbusbind.c
@@ -1401,7 +1401,7 @@ usage: (dbus-message-internal &rest REST)  */)
 
       if ((mtype == DBUS_MESSAGE_TYPE_ERROR)
          && (!dbus_message_set_error_name (dmessage, DBUS_ERROR_FAILED)))
-       XD_SIGNAL1 (build_string ("Unable to create a error message"));
+       XD_SIGNAL1 (build_string ("Unable to create an error message"));
     }
 
   /* Check for timeout parameter.  */

diff --git a/src/image.c b/src/image.c
index 6e86083437856e36fd4e6c0761fb5b79b6f117b0..37416c16168db71ceb256a1f8a771c16150e6d8a 100644 (file)
--- a/src/image.c
+++ b/src/image.c
@@ -8281,7 +8281,7 @@ extern WandExport void PixelGetMagickColor (const PixelWand *,
 #endif
 
 /* Log ImageMagick error message.
-   Useful when a ImageMagick function returns the status `MagickFalse'.  */
+   Useful when an ImageMagick function returns the status `MagickFalse'.  */
 
 static void
 imagemagick_error (MagickWand *wand)

diff --git a/src/inotify.c b/src/inotify.c
index 08da308c97801d945c5275f8443d0cd615ae6c02..e06cc97c6a719543ca50774c3e253204a3ceae88 100644 (file)
--- a/src/inotify.c
+++ b/src/inotify.c
@@ -503,7 +503,7 @@ DEFUN ("inotify-watch-list", Finotify_watch_list, Sinotify_watch_list, 0, 0, 0,
 }
 
 DEFUN ("inotify-allocated-p", Finotify_allocated_p, Sinotify_allocated_p, 0, 0, 0,
-       doc: /* Return non-nil, if a inotify instance is allocated.  */)
+       doc: /* Return non-nil, if an inotify instance is allocated.  */)
 {
   return inotifyfd < 0 ? Qnil : Qt;
 }

diff --git a/src/keymap.c b/src/keymap.c
index 80a899b57556a86a5a235cbca536b8644909871e..c8cc933e7829b4b58342b74c3b67783283821a56 100644 (file)
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -1278,7 +1278,7 @@ append_key (Lisp_Object key_sequence, Lisp_Object key)
   return CALLN (Fvconcat, key_sequence, key_list);
 }
 
-/* Given a event type C which is a symbol,
+/* Given an event type C which is a symbol,
    signal an error if is a mistake such as RET or M-RET or C-DEL, etc.  */
 
 static void

diff --git a/src/regex.c b/src/regex.c
index d70a59cbb854b09a79ea265ae7f39055ddbd584f..e8b99f6f02362f4f8df919707d570bbb0f395f71 100644 (file)
--- a/src/regex.c
+++ b/src/regex.c
@@ -5792,7 +5792,7 @@ re_match_2_internal (struct re_pattern_buffer *bufp, const_re_char *string1,
 
            EXTRACT_NUMBER (mcnt, p2 - 2);
 
-           /* Ensure this is a indeed the trivial kind of loop
+           /* Ensure this is indeed the trivial kind of loop
               we are expecting.  */
            assert (skip_one_char (p1) == p2 - 3);
            assert ((re_opcode_t) p2[-3] == jump && p2 + mcnt == p);

diff --git a/src/syntax.c b/src/syntax.c
index e6a21e5433eec6ab085832de7190c9646bc017d7..378064611cc46cb0a7ead36f32e451d83ab1fbf1 100644 (file)
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -3028,7 +3028,7 @@ Comments are ignored if `parse-sexp-ignore-comments' is non-nil.
 
 If we reach the beginning or end of the accessible part of the buffer
 before we have scanned over COUNT lists, return nil if the depth at
-that point is zero, and signal a error if the depth is nonzero.  */)
+that point is zero, and signal an error if the depth is nonzero.  */)
   (Lisp_Object from, Lisp_Object count, Lisp_Object depth)
 {
   CHECK_NUMBER (from);

diff --git a/src/xdisp.c b/src/xdisp.c
index bf1737b9cf7a34349ee335b9f7ba6cb7c3c81bdc..da9c31314cabd648ec7232f68d7581a3c47475df 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -32479,7 +32479,7 @@ or `nobreak-hyphen' face respectively.
 U+00A0 (no-break space), U+00AD (soft hyphen), U+2010 (hyphen), and
 U+2011 (non-breaking hyphen) are affected.
 
-Any other non-nil value means to display these characters as a escape
+Any other non-nil value means to display these characters as an escape
 glyph followed by an ordinary space or hyphen.
 
 A value of nil means no special handling of these characters.  */);