From: Gregory Heytings Date: Wed, 20 Jul 2022 19:53:36 +0000 (+0000) Subject: * src/xdisp.c (redisplay_window): Small optimization. X-Git-Tag: emacs-29.0.90~1447^2~821^2 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e09c056a440e78afd0e1920250714bc6de6ccf4f;p=emacs.git * src/xdisp.c (redisplay_window): Small optimization. --- diff --git a/src/xdisp.c b/src/xdisp.c index 4701e2b2459..2a6f32aa61f 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -19295,15 +19295,16 @@ redisplay_window (Lisp_Object window, bool just_this_one_p) && !current_buffer->long_line_optimizations_p && MODIFF - UNCHANGED_MODIFIED > 8) { - ptrdiff_t cur, next, found, max = 0; + ptrdiff_t cur, next, found, max = 0, threshold; + threshold = XFIXNUM (Vlong_line_threshold); for (cur = 1; cur < Z; cur = next) { next = find_newline1 (cur, CHAR_TO_BYTE (cur), 0, -1, 1, &found, NULL, true); if (next - cur > max) max = next - cur; - if (!found || max > XFIXNUM (Vlong_line_threshold)) break; + if (!found || max > threshold) break; } - if (max > XFIXNUM (Vlong_line_threshold)) + if (max > threshold) current_buffer->long_line_optimizations_p = true; }