lisp-font-lock-keywords-2
lisp-font-lock-keywords-2 is a variable defined in `
lisp-mode.el
'.
Its value is shown
below.
Documentation:
Gaudy level highlighting for Emacs Lisp mode.
Value:
(("(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:advice\\|derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ '(]*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
(1 font-lock-keyword-face)
(2
(let
((type
(get
(intern-soft
(match-string 1))
'lisp-define-type)))
(cond
((eq type 'var)
font-lock-variable-name-face)
((eq type 'type)
font-lock-type-face)
(t font-lock-function-name-face)))
nil t))
("^;;;###\\([-a-z]*autoload\\)" 1 font-lock-warning-face prepend)
("\\[\\(\\^\\)" 1 font-lock-negation-char-face prepend)
("(\\(c\\(?:l-\\(?:block\\|c\\(?:\\(?:\\(?:type\\)?c\\)?ase\\)\\|d\\(?:e\\(?:claim\\|structuring-bind\\)\\|o\\*?\\)\\|e\\(?:case\\|typecase\\|val-when\\)\\|flet\\*?\\|l\\(?:abels\\|etf\\|o\\(?:cally\\|op\\)\\)\\|m\\(?:acrolet\\|ultiple-value-bind\\)\\|pro\\(?:claim\\|gv\\)\\|return\\(?:-from\\)?\\|symbol-macrolet\\|t\\(?:agbody\\|\\(?:h\\|ypecas\\)e\\)\\)\\|o\\(?:mbine-after-change-calls\\|nd\\(?:ition-case\\(?:-unless-debug\\)?\\)?\\)\\)\\|d\\(?:eclare\\|o\\(?:list\\|times\\)\\)\\|eval-\\(?:\\(?:and\\|when\\)-compile\\)\\|go\\|i\\(?:f\\|gnore-errors\\)\\|l\\(?:ambda\\|et\\(?:\\*\\|rec\\)?\\)\\|p\\(?:case\\(?:-\\(?:exhaustive\\|let\\*?\\)\\)?\\|rog[12n]\\)\\|save-\\(?:current-buffer\\|excursion\\|match-data\\|restriction\\|selected-window\\|window-excursion\\)\\|track-mouse\\|un\\(?:less\\|wind-protect\\)\\|w\\(?:h\\(?:en\\|ile\\(?:-no-input\\)?\\)\\|ith-\\(?:c\\(?:a\\(?:\\(?:se\\|tegory\\)-table\\)\\|oding-priority\\|urrent-buffer\\)\\|demoted-errors\\|e\\(?:lectric-help\\|val-after-load\\)\\|file-modes\\|local-quit\\|no-warnings\\|output-to-\\(?:string\\|temp-buffer\\)\\|s\\(?:elected-\\(?:frame\\|window\\)\\|ilent-modifications\\|lots\\|yntax-table\\)\\|t\\(?:emp-\\(?:buffer\\|\\(?:fil\\|messag\\)e\\)\\|imeout\\(?:-handler\\)?\\)\\)\\)\\)\\_>" . 1)
("(\\(catch\\|throw\\|featurep\\|provide\\|require\\)\\_>[ ']*\\(\\(?:\\sw\\|\\s_\\)+\\)?"
(1 font-lock-keyword-face)
(2 font-lock-constant-face nil t))
("(\\(cl-\\(?:assert\\|check-type\\)\\|error\\|signal\\|user-error\\|warn\\)\\_>"
(1 font-lock-warning-face))
("\\\\\\\\\\[\\(\\(?:\\sw\\|\\s_\\)+\\)\\]"
(1 font-lock-constant-face prepend))
("`\\(\\(?:\\sw\\|\\s_\\)\\(?:\\sw\\|\\s_\\)+\\)'"
(1 font-lock-constant-face prepend))
("\\_<:\\(?:\\sw\\|\\s_\\)+\\_>" 0 font-lock-builtin-face)
("\\_<\\&\\(?:\\sw\\|\\s_\\)+\\_>" . font-lock-type-face)
(#[257 "\30021 \301\302\303#\2050 \304\224\204 \305`S\306\"\211<\203! \307>\204' \211\307=\203, \310\300\303\"\210\210\202 0\207"
[found re-search-forward "\\(\\\\\\\\\\)\\(?:\\(\\\\\\\\\\)\\|\\((\\(?:\\?[0-9]*:\\)?\\|[|)]\\)\\)" t 2 get-text-property face font-lock-string-face throw]
5 "\n\n(fn BOUND)"]
(1 'font-lock-regexp-grouping-backslash prepend)
(3 'font-lock-regexp-grouping-construct prepend))
(lisp--match-hidden-arg
(0
'(face font-lock-warning-face help-echo "Hidden behind deeper element; move to another line?"))))