;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



#@1820 Defaults for Font Lock mode specified by the major mode.
Defaults should be of the form:

 (KEYWORDS [KEYWORDS-ONLY [CASE-FOLD [SYNTAX-ALIST ...]]])

KEYWORDS may be a symbol (a variable or function whose value is the keywords
to use for fontification) or a list of symbols (specifying different levels
of fontification).

If KEYWORDS-ONLY is non-nil, syntactic fontification (strings and
comments) is not performed.

If CASE-FOLD is non-nil, the case of the keywords is ignored when fontifying.

If SYNTAX-ALIST is non-nil, it should be a list of cons pairs of the form
(CHAR-OR-STRING . STRING) used to set the local Font Lock syntax table, for
keyword and syntactic fontification (see `modify-syntax-entry').

These item elements are used by Font Lock mode to set the variables
`font-lock-keywords', `font-lock-keywords-only',
`font-lock-keywords-case-fold-search', `font-lock-syntax-table'.

Further item elements are alists of the form (VARIABLE . VALUE) and are in no
particular order.  Each VARIABLE is made buffer-local before set to VALUE.

Currently, appropriate variables include `font-lock-mark-block-function'.
If this is non-nil, it should be a function with no args used to mark any
enclosing block of text, for fontification via \[font-lock-fontify-block].
Typical values are `mark-defun' for programming modes or `mark-paragraph' for
textual modes (i.e., the mode-dependent function is known to put point and mark
around a text block relevant to that mode).

Other variables include that for syntactic keyword fontification,
`font-lock-syntactic-keywords' and those for buffer-specialized fontification
functions, `font-lock-fontify-buffer-function',
`font-lock-unfontify-buffer-function', `font-lock-fontify-region-function',
`font-lock-unfontify-region-function', and `font-lock-inhibit-thing-lock'.
(defvar font-lock-defaults nil (#$ . 86))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local font-lock-defaults put risky-local-variable t] 4)
#@142 A function which is called when `font-lock-mode' is toggled.
It will be passed one argument, which is the current value of
`font-lock-mode'.
(defvar font-lock-function 'font-lock-default-function (#$ . 2080))
#@97 Non-nil if Font-Lock mode is enabled.
Use the command `font-lock-mode' to change this variable.
(defvar font-lock-mode nil (#$ . 2295))
(make-variable-buffer-local 'font-lock-mode)
#@2651 Toggle syntax highlighting in this buffer (Font Lock mode).

This is a minor mode.  If called interactively, toggle the `Font-Lock
mode' mode.  If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `font-lock-mode'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

When Font Lock mode is enabled, text is fontified as you type it:

 - Comments are displayed in `font-lock-comment-face';
 - Strings are displayed in `font-lock-string-face';
 - Certain other expressions are displayed in other faces
   according to the value of the variable `font-lock-keywords'.

To customize the faces (colors, fonts, etc.) used by Font Lock for
fontifying different parts of buffer text, use \[customize-face].

You can enable Font Lock mode in any major mode automatically by
turning on in the major mode's hook.  For example, put in your
~/.emacs:

 (add-hook \='c-mode-hook \='turn-on-font-lock)

Alternatively, you can use Global Font Lock mode to automagically
turn on Font Lock mode in buffers whose major mode supports it
and whose major mode is one of `font-lock-global-modes'.  For
example, put in your ~/.emacs:

 (global-font-lock-mode t)

Where major modes support different levels of fontification, you
can use the variable `font-lock-maximum-decoration' to specify
which level you generally prefer.  When you turn Font Lock mode
on/off the buffer is fontified/defontified, though fontification
occurs only if the buffer is less than `font-lock-maximum-size'.

To add your own highlighting for some major mode, and modify the
highlighting selected automatically via the variable
`font-lock-maximum-decoration', you can use
`font-lock-add-keywords'.

To fontify a buffer, without turning on Font Lock mode and
regardless of buffer size, you can use \[font-lock-fontify-buffer].

To fontify a block (the function or paragraph containing point,
or a number of lines around point), perhaps because modification
on the current line caused syntactic change on other lines, you
can use \[font-lock-fontify-block].

You can set your own default settings for some mode, by setting a
buffer local value for `font-lock-defaults', via its mode hook.

The above is the default behavior of `font-lock-mode'; you may
specify your own function which is called when `font-lock-mode'
is toggled via `font-lock-function'.

(fn &optional ARG)
(defalias 'font-lock-mode #[256 "\304 
\305=\203
?\202
\247\203
\306W\203\307\202\310\311\301!\2031\312\300	\"\2031\300	B\n\204>\313 \314H\315=\203@\307!\210\203R\316\317\320\307\310$\210\202X\321\317\320\310#\210\322\323\203b\324\202c\325\"\210\326\327!\203\205\304 \203w\211\304 \232\203\205\330\331\203\201\332\202\202\333\334#\210\335 \266\336 \210\207" [font-lock-mode local-minor-modes noninteractive font-lock-function current-message toggle 1 nil t boundp delq buffer-name 0 32 add-hook change-major-mode-hook font-lock-change-mode remove-hook run-hooks font-lock-mode-hook font-lock-mode-on-hook font-lock-mode-off-hook called-interactively-p any message "Font-Lock mode %sabled%s" "en" "dis" " in current buffer" font-lock-initial-fontify force-mode-line-update] 7 (#$ . 2484) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar font-lock-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [font-lock-mode-map font-lock-mode-hook variable-documentation put "Hook run after entering or leaving `font-lock-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode font-lock-mode boundp] 6)
(defalias 'font-lock-change-mode #[0 "\300\301!\207" [font-lock-mode -1] 2])
#@176 Clear out all `font-lock-face' properties in current buffer.
A major mode that uses `font-lock-face' properties might want to put
this function onto `change-major-mode-hook'.
(defalias 'font-lock-defontify #[0 "\301 \302\214~\210\303ed\304#\210)\305
!)\207" [inhibit-read-only buffer-modified-p t remove-list-of-text-properties (font-lock-face) restore-buffer-modified-p] 5 (#$ . 6631)])
#@13 

(fn MODE)
(defalias 'font-lock-default-function #[257 "\211\203-\301\300!\210\302!\303\236\211\203&\304
A>\204,\211
A\304C\244\241\266\202-\303\304DB\210\211\204S\301\300!\210\302!\303\236\211\203R\211\305\304A\"\241\210\211A\204R\306
\"\210\307
!\205\\\310
!\207" [char-property-alias-alist make-local-variable copy-tree face font-lock-face remq delq font-lock-specified-p font-lock-mode-internal] 6 (#$ . 7026)])
#@63 Turn on Font Lock mode (only if the terminal can display it).
(defalias 'turn-on-font-lock #[0 "?\205\300 \207" [font-lock-mode] 1 (#$ . 7469)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable font-lock-global-modes funcall function #[0 "\300\207" [t] 1 ""] "Modes for which Font Lock mode is automagically turned on.\nGlobal Font Lock mode is controlled by the command `global-font-lock-mode'.\nIf nil, means no modes have Font Lock mode automatically turned on.\nIf t, all modes that support Font Lock mode have it automatically turned on.\nIf a list, it should be a list of `major-mode' symbol names for which Font Lock\nmode should be automatically turned on.  The sense of the list is negated if it\nbegins with `not'.  For example:\n (c-mode c++-mode)\nmeans that Font Lock mode is turned on for buffers in C and C++ modes only." :type (choice (const :tag "none" nil) (const :tag "all" t) (set :menu-tag "mode specific" :tag "modes" :value (not) (const :tag "Except" not) (repeat :inline t (symbol :tag "mode")))) :group font-lock] 8)
(defalias 'turn-on-font-lock-if-desired #[0 "\303=\204\242\304=\203	A>?\202	>\205 \305\306 )\207" [font-lock-global-modes major-mode inhibit-quit t not nil turn-on-font-lock] 2])
(put 'global-font-lock-mode 'globalized-minor-mode t)
(defvar font-lock-mode-major-mode nil nil)
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315\316\317\320\321&
\207" [make-variable-buffer-local font-lock-mode-major-mode custom-declare-variable global-font-lock-mode funcall function #[0 "\206	?\207" [noninteractive emacs-basic-display] 1 ""] "Non-nil if Global Font-Lock mode is enabled.\nSee the `global-font-lock-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `global-font-lock-mode'." :set custom-set-minor-mode :initialize custom-initialize-delay :type boolean :group font-lock :version "22.1"] 14)
#@471 Toggle Font-Lock mode in all buffers.
With prefix ARG, enable Global Font-Lock mode if ARG is positive;
otherwise, disable it.

If called from Lisp, toggle the mode if ARG is `toggle'.
Enable the mode if ARG is nil, omitted, or is a positive number.
Disable the mode if ARG is a negative number.

Font-Lock mode is enabled in all buffers where
`turn-on-font-lock-if-desired' would do it.

See `font-lock-mode' for more information on Font-Lock mode.

(fn &optional ARG)
(defalias 'global-font-lock-mode #[256 "\303 \304\301\305=\203\306\301!?\202!\247\203 \307W\203 \310\202!\311\"\210\312\300!\2038\313\301\"\306\301!\2038\301B	\203N\314\315\316\"\210\314\317\320\"\210\314\321\322\"\210\202]\323\315\316\"\210\323\317\320\"\210\323\321\322\"\210\324 \211\203\203\211@r\211q\210	\203s\325 \210\202{\n\203{\302\326!\210)
A\266\202\202_\210\327\330\306\301!\203\220\331\202\221\332\"\210\333\334!\203\271\335\301!\210\303 \203\251\211\303 \232\203\271\336\337\306\301!\203\265\340\202\266\341\342#\210\210\343 \210\306\301!\207" [global-minor-modes global-font-lock-mode font-lock-mode current-message set-default toggle default-value 1 nil t boundp delq add-hook after-change-major-mode-hook global-font-lock-mode-enable-in-buffers find-file-hook global-font-lock-mode-check-buffers change-major-mode-hook global-font-lock-mode-cmhh remove-hook buffer-list turn-on-font-lock-if-desired -1 run-hooks global-font-lock-mode-hook global-font-lock-mode-on-hook global-font-lock-mode-off-hook called-interactively-p any customize-mark-as-set message "Global Font-Lock mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 9531) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar global-font-lock-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\207" [global-font-lock-mode-map global-font-lock-mode-hook variable-documentation put "Hook run after entering or leaving `global-font-lock-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode global-font-lock-mode boundp] 6)
(defvar font-lock-mode-set-explicitly nil nil)
(make-variable-buffer-local 'font-lock-mode-set-explicitly)
(defalias 'font-lock-mode-set-explicitly #[0 "\301\211\207" [font-lock-mode-set-explicitly t] 2])
(byte-code "\300\301\302\303#\210\304\305\301\"\207" [put font-lock-mode-set-explicitly definition-name global-font-lock-mode add-hook font-lock-mode-hook] 4)
(defvar global-font-lock-mode-buffers nil)
(defalias 'global-font-lock-mode-enable-in-buffers #[0 "\305\211\211\2059\211@\306
!\2032r\211q\210	\204/\n=\204/\f\203,\304\307!\210\310 \210\202/\310 \210)
A\266\202\202\207" [global-font-lock-mode-buffers font-lock-mode-set-explicitly font-lock-mode-major-mode major-mode font-lock-mode nil buffer-live-p -1 turn-on-font-lock-if-desired] 5])
(put 'global-font-lock-mode-enable-in-buffers 'definition-name 'global-font-lock-mode)
(defalias 'global-font-lock-mode-check-buffers #[0 "\300 \210\301\302\303\"\207" [global-font-lock-mode-enable-in-buffers remove-hook post-command-hook global-font-lock-mode-check-buffers] 3])
(put 'global-font-lock-mode-check-buffers 'definition-name 'global-font-lock-mode)
(defalias 'global-font-lock-mode-cmhh #[0 "\300\301p\"\210\302\303\304\"\207" [add-to-list global-font-lock-mode-buffers add-hook post-command-hook global-font-lock-mode-check-buffers] 3])
(byte-code "\300\301\302\303#\210\304\305!\207" [put global-font-lock-mode-cmhh definition-name global-font-lock-mode provide font-core] 4)