| Server IP : 217.160.0.212 / Your IP : 216.73.216.227 Web Server : Apache System : Linux www 6.18.52-i1-ampere #1203 SMP Mon Sep 14 18:29:59 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/obsolete/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\301%\207" [require font-lock custom-declare-group lazy-lock nil "Font Lock support mode to fontify lazily." :group] 6) (defvar lazy-lock-mode nil) (defvar lazy-lock-buffers nil) (defvar lazy-lock-timers (list nil)) (byte-code "\300\301\302\303\304DD\305\306\307%\210\300\310\302\303\311DD\312\306\313%\210\300\314\302\303\315DD\316\306\317%\210\300\320\302\303\321DD\322\306\323%\210\300\324\302\303\325DD\326\306\327%\210\300\330\302\303\331DD\332\306\333%\210\300\334\302\303\335DD\336\306\337%\210\300\340\302\303\341DD\342\306\3431g \344 0\202k \210\202r \203r \345\202s \346%\210\300\347\302\303\350DD\351\306\352%\210\300\353\302\303\354DD\355\306\356%\207" [custom-declare-variable lazy-lock-minimum-size funcall function #[0 "\300\207" [25600] 1 #1=""] "Minimum size of a buffer for demand-driven fontification.\nOn-demand fontification occurs if the buffer size is greater than this value.\nIf nil, means demand-driven fontification is never performed.\nIf a list, each element should be a cons pair of the form (MAJOR-MODE . SIZE),\nwhere MAJOR-MODE is a symbol or t (meaning the default). For example:\n ((c-mode . 25600) (c++-mode . 25600) (rmail-mode . 1048576))\nmeans that the minimum size is 25K for buffers in C or C++ modes, one megabyte\nfor buffers in Rmail mode, and size is irrelevant otherwise.\n\nThe value of this variable is used when Lazy Lock mode is turned on." :type (choice (const :tag "none" nil) (integer :tag "size") (repeat :menu-tag "mode specific" :tag "mode specific" :value ((t)) (cons :tag "Instance" (radio :tag "Mode" (const :tag "all" t) (symbol :tag "name")) (radio :tag "Size" (const :tag "none" nil) (integer :tag "size"))))) lazy-lock-defer-on-the-fly #[0 "\300\207" [t] 1 #1#] "If non-nil, means fontification after a change should be deferred.\nIf nil, means on-the-fly fontification is performed. This means when changes\noccur in the buffer, those areas are immediately fontified.\nIf a list, it should be a list of `major-mode' symbol names for which deferred\nfontification should occur. The sense of the list is negated if it begins with\n`not'. For example:\n (c-mode c++-mode)\nmeans that on-the-fly fontification is deferred for buffers in C and C++ modes\nonly, and deferral does not occur otherwise.\n\nThe value of this variable is used when Lazy Lock mode is turned on." (choice (const :tag "never" nil) (const :tag "always" t) (set :menu-tag "mode specific" :tag "modes" :value (not) (const :tag "Except" not) (repeat :inline t (symbol :tag "mode")))) lazy-lock-defer-on-scrolling #[0 "\300\207" [nil] 1 #1#] "If non-nil, means fontification after a scroll should be deferred.\nIf nil, means demand-driven fontification is performed. This means when\nscrolling into unfontified areas of the buffer, those areas are immediately\nfontified. Thus scrolling never presents unfontified areas. However, since\nfontification occurs during scrolling, scrolling may be slow.\nIf t, means defer-driven fontification is performed. This means fontification\nof those areas is deferred. Thus scrolling may present momentarily unfontified\nareas. However, since fontification does not occur during scrolling, scrolling\nwill be faster than demand-driven fontification.\nIf any other value, e.g., `eventually', means demand-driven fontification is\nperformed until the buffer is fontified, then buffer fontification becomes\ndefer-driven. Thus scrolling never presents unfontified areas until the buffer\nis first fontified, after which subsequent scrolling may present future buffer\ninsertions momentarily unfontified. However, since fontification does not\noccur during scrolling after the buffer is first fontified, scrolling will\nbecome faster. (But, since contextual changes continually occur, such a value\nmakes little sense if `lazy-lock-defer-contextually' is non-nil.)\n\nThe value of this variable is used when Lazy Lock mode is turned on." (choice (const :tag "never" nil) (const :tag "always" t) (other :tag "eventually" eventually)) lazy-lock-defer-contextually #[0 "\300\207" [syntax-driven] 1 #1#] "If non-nil, means deferred fontification should be syntactically true.\nIf nil, means deferred fontification occurs only on those lines modified. This\nmeans where modification on a line causes syntactic change on subsequent lines,\nthose subsequent lines are not refontified to reflect their new context.\nIf t, means deferred fontification occurs on those lines modified and all\nsubsequent lines. This means those subsequent lines are refontified to reflect\ntheir new syntactic context, either immediately or when scrolling into them.\nIf any other value, e.g., `syntax-driven', means deferred syntactically true\nfontification occurs only if syntactic fontification is performed using the\nbuffer mode's syntax table, i.e., only if `font-lock-keywords-only' is nil.\n\nThe value of this variable is used when Lazy Lock mode is turned on." (choice (const :tag "never" nil) (const :tag "always" t) (other :tag "syntax-driven" syntax-driven)) lazy-lock-defer-time #[0 "\300\207" [0.25] 1 #1#] "Time in seconds to delay before beginning deferred fontification.\nDeferred fontification occurs if there is no input within this time.\nIf nil, means fontification is never deferred, regardless of the values of the\nvariables `lazy-lock-defer-on-the-fly', `lazy-lock-defer-on-scrolling' and\n`lazy-lock-defer-contextually'.\n\nThe value of this variable is used when Lazy Lock mode is turned on." (choice (const :tag "never" nil) (number :tag "seconds")) lazy-lock-stealth-time #[0 "\300\207" [30] 1 #1#] "Time in seconds to delay before beginning stealth fontification.\nStealth fontification occurs if there is no input within this time.\nIf nil, means stealth fontification is never performed.\n\nThe value of this variable is used when Lazy Lock mode is turned on." (choice (const :tag "never" nil) (number :tag "seconds")) lazy-lock-stealth-lines #[0 "\203 \301\207\302\207" [font-lock-maximum-decoration 100 250] 1 #1#] "Maximum size of a chunk of stealth fontification.\nEach iteration of stealth fontification can fontify this number of lines.\nTo speed up input response during stealth fontification, at the cost of stealth\ntaking longer to fontify, you could reduce the value of this variable." (integer :tag "lines") lazy-lock-stealth-load #[0 "\3001\n \301 0\202 \210\302\207\205 \303\207" [(error) load-average nil 200] 1 #1#] "Load in percentage above which stealth fontification is suspended.\nStealth fontification pauses when the system short-term load average (as\nreturned by the function `load-average' if supported) goes above this level,\nthus reducing the demand that stealth fontification makes on the system.\nIf nil, means stealth fontification is never suspended.\nTo reduce machine load during stealth fontification, at the cost of stealth\ntaking longer to fontify, you could reduce the value of this variable.\nSee also `lazy-lock-stealth-nice'." (error) load-average (choice (const :tag "never" nil) (integer :tag "load")) (const :format "%t: unsupported\n" nil) lazy-lock-stealth-nice #[0 "\300\207" [0.125] 1 #1#] "Time in seconds to pause between chunks of stealth fontification.\nEach iteration of stealth fontification is separated by this amount of time,\nthus reducing the demand that stealth fontification makes on the system.\nIf nil, means stealth fontification is never paused.\nTo reduce machine load during stealth fontification, at the cost of stealth\ntaking longer to fontify, you could increase the value of this variable.\nSee also `lazy-lock-stealth-load'." (choice (const :tag "never" nil) (number :tag "seconds")) lazy-lock-stealth-verbose #[0 "?\205 ??\207" [lazy-lock-defer-contextually font-lock-verbose] 1 #1#] "If non-nil, means stealth fontification should show status messages." boolean] 6) #@2974 Toggle Lazy Lock mode. With arg, turn Lazy Lock mode on if and only if arg is positive. Enable it automatically in your `~/.emacs' by: (setq font-lock-support-mode \='lazy-lock-mode) For a newer font-lock support mode with similar functionality, see `jit-lock-mode'. Eventually, Lazy Lock mode will be deprecated in JIT Lock's favor. When Lazy Lock mode is enabled, fontification can be lazy in a number of ways: - Demand-driven buffer fontification if `lazy-lock-minimum-size' is non-nil. This means initial fontification does not occur if the buffer is greater than `lazy-lock-minimum-size' characters in length. Instead, fontification occurs when necessary, such as when scrolling through the buffer would otherwise reveal unfontified areas. This is useful if buffer fontification is too slow for large buffers. - Deferred scroll fontification if `lazy-lock-defer-on-scrolling' is non-nil. This means demand-driven fontification does not occur as you scroll. Instead, fontification is deferred until after `lazy-lock-defer-time' seconds of Emacs idle time, while Emacs remains idle. This is useful if fontification is too slow to keep up with scrolling. - Deferred on-the-fly fontification if `lazy-lock-defer-on-the-fly' is non-nil. This means on-the-fly fontification does not occur as you type. Instead, fontification is deferred until after `lazy-lock-defer-time' seconds of Emacs idle time, while Emacs remains idle. This is useful if fontification is too slow to keep up with your typing. - Deferred context fontification if `lazy-lock-defer-contextually' is non-nil. This means fontification updates the buffer corresponding to true syntactic context, after `lazy-lock-defer-time' seconds of Emacs idle time, while Emacs remains idle. Otherwise, fontification occurs on modified lines only, and subsequent lines can remain fontified corresponding to previous syntactic contexts. This is useful where strings or comments span lines. - Stealthy buffer fontification if `lazy-lock-stealth-time' is non-nil. This means remaining unfontified areas of buffers are fontified if Emacs has been idle for `lazy-lock-stealth-time' seconds, while Emacs remains idle. This is useful if any buffer has any deferred fontification. Basic Font Lock mode on-the-fly fontification behavior fontifies modified lines only. Thus, if `lazy-lock-defer-contextually' is non-nil, Lazy Lock mode on-the-fly fontification may fontify differently, albeit correctly. In any event, to refontify some lines you can use \[font-lock-fontify-block]. Stealth fontification only occurs while the system remains unloaded. If the system load rises above `lazy-lock-stealth-load' percent, stealth fontification is suspended. Stealth fontification intensity is controlled via the variable `lazy-lock-stealth-nice' and `lazy-lock-stealth-lines', and verbosity is controlled via the variable `lazy-lock-stealth-verbose'. (fn &optional ARG) (defalias 'lazy-lock-mode #[256 "\300 >?\205 \203 \303!\304V\202 \211?\211\203&