Fix typos in comments. Use xassert.

diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index 00340e5937bf92332102cab69d3832562647d196..57eab6755c88a82a95ac553096c23acc42fb2111 100644 (file)
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -268,7 +268,7 @@ Letters do not insert themselves; instead, they are commands.
   (setq truncate-lines t)
   (setq buffer-read-only t)
   ;; Force L2R direction, to avoid messing the display if the first
-  ;; buffer in the list happens to begin with a string R2L character.
+  ;; buffer in the list happens to begin with a strong R2L character.
   (setq bidi-paragraph-direction 'left-to-right))
 
 (define-obsolete-variable-alias 'buffer-menu-mode-hook
@@ -817,7 +817,7 @@ For more information, see the function `buffer-menu'."
       (erase-buffer)
       (setq standard-output (current-buffer))
       ;; Force L2R direction, to avoid messing the display if the
-      ;; first buffer in the list happens to begin with a string R2L
+      ;; first buffer in the list happens to begin with a strong R2L
       ;; character.
       (setq bidi-paragraph-direction 'left-to-right)
       (unless Buffer-menu-use-header-line

diff --git a/src/bidi.c b/src/bidi.c
index 0cd8deb47c05f3d6e5d0cc11240d7ce6547f0f08..5c9239d60f08f4629563440a3bcabeac0e61e9b2 100644 (file)
--- a/src/bidi.c
+++ b/src/bidi.c
@@ -240,8 +240,7 @@ bidi_push_embedding_level (struct bidi_it *bidi_it,
                           int level, bidi_dir_t override)
 {
   bidi_it->stack_idx++;
-  if (bidi_it->stack_idx >= BIDI_MAXLEVEL)
-    abort ();
+  xassert (bidi_it->stack_idx < BIDI_MAXLEVEL);
   bidi_it->level_stack[bidi_it->stack_idx].level = level;
   bidi_it->level_stack[bidi_it->stack_idx].override = override;
 }
@@ -556,9 +555,9 @@ static int bidi_cache_sp;
 
 /* Push the bidi iterator state in preparation for reordering a
    different object, e.g. display string found at certain buffer
-   position.  Pushing the bidi iterator boils to saving its entire
-   state on the cache and starting a new cache "stacked" on top of the
-   current cache.  */
+   position.  Pushing the bidi iterator boils down to saving its
+   entire state on the cache and starting a new cache "stacked" on top
+   of the current cache.  */
 void
 bidi_push_it (struct bidi_it *bidi_it)
 {
@@ -568,8 +567,7 @@ bidi_push_it (struct bidi_it *bidi_it)
   memcpy (&bidi_cache[bidi_cache_idx++], bidi_it, sizeof (struct bidi_it));
 
   /* Push the current cache start onto the stack.  */
-  if (bidi_cache_sp >= IT_STACK_SIZE)
-    abort ();
+  xassert (bidi_cache_sp < IT_STACK_SIZE);
   bidi_cache_start_stack[bidi_cache_sp++] = bidi_cache_start;
 
   /* Start a new level of cache, and make it empty.  */
@@ -2034,7 +2032,7 @@ bidi_move_to_visually_next (struct bidi_it *bidi_it)
     }
 
   /* The code below can call eval, and thus cause GC.  If we are
-     iterating a Lisp string, make sure it won't GCed.  */
+     iterating a Lisp string, make sure it won't be GCed.  */
   if (STRINGP (bidi_it->string.lstring))
     GCPRO1 (bidi_it->string.lstring);