From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 7 May 2016 08:00:36 +0000 (+0300)
Subject: Try to speed-up display of many all-blank lines
X-Git-Tag: emacs-26.0.90~1989
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa6a6edd1d670e2826186ee943ae7ca083771801;p=emacs.git

Try to speed-up display of many all-blank lines

* src/bidi.c (bidi_initialize): Use anchored regexps for
paragraph start and paragraph separator sequences.  (Bug#23457)
---

diff --git a/src/bidi.c b/src/bidi.c
index 573e513469d..6ea84d9c0c4 100644
--- a/src/bidi.c
+++ b/src/bidi.c
@@ -1107,15 +1107,9 @@ bidi_initialize (void)
     emacs_abort ();
   staticpro (&bidi_brackets_table);
 
-  DEFSYM (Qparagraph_start, "paragraph-start");
-  paragraph_start_re = Fsymbol_value (Qparagraph_start);
-  if (!STRINGP (paragraph_start_re))
-    paragraph_start_re = build_string ("\f\\|[ \t]*$");
+  paragraph_start_re = build_string ("^\\(\f\\|[ \t]*\\)$");
   staticpro (&paragraph_start_re);
-  DEFSYM (Qparagraph_separate, "paragraph-separate");
-  paragraph_separate_re = Fsymbol_value (Qparagraph_separate);
-  if (!STRINGP (paragraph_separate_re))
-    paragraph_separate_re = build_string ("[ \t\f]*$");
+  paragraph_separate_re = build_string ("^[ \t\f]*$");
   staticpro (&paragraph_separate_re);
 
   bidi_cache_sp = 0;