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



(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\210\312\322\314\315\323DD\324\320\325%\210\312\326\314\315\327DD\330\320\331%\210\312\332\314\315\333DD\334\335\336\320\337&\210\312\340\314\315\341DD\342\335\343\320\344&\210\345\340\346\347#\207" [require cc-mode custom-declare-group cwarn nil "Highlight suspicious C and C++ constructions." :version "21.1" :group faces custom-declare-variable cwarn-configuration funcall function #[0 "\300\207" [((c-mode (not reference)) (c++-mode t))] 1 #1=""] "List of items each describing which features are enable for a mode.\nEach item is on the form (mode featurelist), where featurelist can be\non one of three forms:\n\n* A list of enabled features.\n* A list starting with the atom `not' followed by the features\n  which are not enabled.\n* The atom t, that represent that all features are enabled.\n\nSee variable `cwarn-font-lock-feature-keywords-alist' for available\nfeatures." :type (repeat sexp) cwarn-font-lock-feature-keywords-alist #[0 "\300\207" [((assign . cwarn-font-lock-assignment-keywords) (semicolon . cwarn-font-lock-semicolon-keywords) (reference . cwarn-font-lock-reference-keywords))] 1 #1#] "An alist mapping a CWarn feature to font-lock keywords.\nThe keywords could either a font-lock keyword list or a symbol.\nIf it is a symbol it is assumed to be a variable containing a font-lock\nkeyword list." (alist :key-type (choice (const assign) (const semicolon) (const reference)) :value-type (sexp :tag "Value")) cwarn-verbose #[0 "\300\207" [t] 1 #1#] "When nil, CWarn mode will not generate any messages.\n\nCurrently, messages are generated when the mode is activated and\ndeactivated." boolean cwarn-mode-text #[0 "\300\207" [" CWarn"] 1 #1#] "String to display in the mode line when CWarn mode is active.\n\n(When the string is not empty, make sure that it has a leading space.)" :tag "CWarn mode text" string cwarn-load-hook #[0 "\300\207" [nil] 1 #1#] "Functions to run when CWarn mode is first loaded." "Load Hook" hook make-obsolete-variable "use `with-eval-after-load' instead." "28.1"] 8)
#@89 Non-nil if Cwarn mode is enabled.
Use the command `cwarn-mode' to change this variable.
(defvar cwarn-mode nil (#$ . 2204))
(make-variable-buffer-local 'cwarn-mode)
#@841 Minor mode that highlights suspicious C and C++ constructions.

This is a minor mode.  If called interactively, toggle the `Cwarn
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 `cwarn-mode'.

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

Suspicious constructs are highlighted using `font-lock-warning-face'.

Note, in addition to enabling this minor mode, the major mode must
be included in the variable `cwarn-configuration'.  By default C and
C++ modes are included.

(fn &optional ARG)
(defalias 'cwarn-mode #[256 "\302 
\303=\203
?\202
\247\203
\304W\203\305\202\306\307\301!\2031\310\300	\"\2031\300	B\311!\210\312 \210\313\314\203B\315\202C\316\"\210\317\320!\203e\302 \203W\211\302 \232\203e\321\322\203a\323\202b\324\325#\210\210\326 \210\207" [cwarn-mode local-minor-modes current-message toggle 1 nil t boundp delq cwarn-font-lock-keywords font-lock-flush run-hooks cwarn-mode-hook cwarn-mode-on-hook cwarn-mode-off-hook called-interactively-p any message "Cwarn mode %sabled%s" "en" "dis" " in current buffer" force-mode-line-update] 6 (#$ . 2376) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar cwarn-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\313\314\300!\205#\310\211%\210\315\316\312\310#\210\317\316\312\320#\207" [cwarn-mode-map cwarn-mode-hook variable-documentation put "Hook run after entering or leaving `cwarn-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 cwarn-mode cwarn-mode-text boundp defalias turn-on-cwarn-mode make-obsolete "24.1"] 6)
#@301 Non-nil if CWarn FEATURE is enabled for MODE.
FEATURE is an atom representing one construction to highlight.

Check if any feature is enabled for MODE if no feature is specified.

The valid features are described by the variable
`cwarn-font-lock-feature-keywords-alist'.

(fn MODE &optional FEATURE)
(defalias 'cwarn-is-enabled #[513 "
\236\211\205)
?\206)\211A@\211\301=\206'\211\242\302=\203$
A>?\202'
>\262
\207" [cwarn-configuration t not] 6 (#$ . 4498)])
#@47 True if point is inside a C macro definition.
(defalias 'cwarn-inside-macro #[0 "\212\300 \210`S\206\n`Sf\301=\203\302y\210\202\303 \210\304f)\305=\207" [beginning-of-line 92 -1 back-to-indentation nil 35] 2 (#$ . 4972)])
#@98 Install/remove keywords into current buffer.
If ADDP is non-nil, install else remove.

(fn ADDP)
(defalias 'cwarn-font-lock-keywords #[257 "\211\2051\211@\211@
A\211<\204\211J\262
\302	\"\203(\203#\303\202$\304\305\"\210\266
A\266\202\202
\207" [cwarn-font-lock-feature-keywords-alist major-mode cwarn-is-enabled font-lock-add-keywords font-lock-remove-keywords nil] 8 (#$ . 5205)])
#@54 Match RE but only if BODY holds.

(fn RE &rest BODY)
(defalias 'cwarn-font-lock-match '(macro . #[385 "\300\301\302\303\304\305\306\307BBE\310\305\311\312\313\314\315\316
BD\317BBBEEED\320BBB\207" [let ((res nil)) while progn setq res re-search-forward (limit t) and save-excursion (when (match-beginning 1) (goto-char (match-beginning 1))) condition-case nil not save-match-data ((error t)) (res)] 16 (#$ . 5606)]))
(defconst cwarn-font-lock-assignment-keywords '((cwarn-font-lock-match-assignment-in-expression (1 font-lock-warning-face))))
#@51 Match assignments inside expressions.

(fn LIMIT)
(defalias 'cwarn-font-lock-match-assignment-in-expression #[257 "\300\301\302\303#\262
\211\203J\212\304\224\203\304\224b\210\3051D\306 \307\310\"\216\311\304!\210g\312>\205<\313\300x\210\314\300x\210\315 \206;\316\317!?)\262
?0\202F\210\303)\204
\207" [nil re-search-forward "[^!<>=]\\(\\([-+*/%&^|]\\|<<\\|>>\\)?=\\)[^=]" t 1 (error) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] backward-up-list (40 91) " " "a-zA-Z0-9_" c-at-toplevel-p looking-at "for\\>"] 6 (#$ . 6158)])
(defconst cwarn-font-lock-semicolon-keywords '((cwarn-font-lock-match-dangerous-semicolon (0 font-lock-warning-face))))
#@146 Match semicolons directly after `for', `while', and `if'.
The semicolon after a `do { ... } while (x);' construction is not matched.

(fn LIMIT)
(defalias 'cwarn-font-lock-match-dangerous-semicolon #[257 "\300\301\302\303#\262
\211\203Q\212\304\224\203\304\224b\210\3051K\306 \307\310\"\216\311\312!\210\313\314!\206C\313\315!\205C\3161A\311\312!\210\313\317!?0\202C\210\303)\262
?0\202M\210\303)\204
\207" [nil re-search-forward ";" t 1 (error) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] backward-sexp 2 looking-at "\\(for\\|if\\)\\>" "while\\>" (error) "do\\>"] 6 (#$ . 6858)])
(defconst cwarn-font-lock-reference-keywords '((cwarn-font-lock-match-reference (1 font-lock-warning-face))))
#@61 Font-lock matcher for C++ reference parameters.

(fn LIMIT)
(defalias 'cwarn-font-lock-match-reference #[257 "\300\301\302\303#\262
\211\203A\212\304\224\203\304\224b\210\3051;\306 \307\310\"\216\311\304!\210g\312=\2053\313 ?\2053\314 )\262
?0\202=\210\303)\204
\207" [nil re-search-forward "[^&]\\(&\\)[^&=]" t 1 (error) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data evaporate] 3] backward-up-list 40 cwarn-inside-macro c-at-toplevel-p] 6 (#$ . 7605)])
#@158 Turn on CWarn mode in the current buffer if applicable.
The mode is turned if some feature is enabled for the current
`major-mode' in `cwarn-configuration'.
(defalias 'turn-on-cwarn-mode-if-enabled #[0 "\301!\205	\302\303!\207" [major-mode cwarn-is-enabled cwarn-mode 1] 2 (#$ . 8098)])
(put 'global-cwarn-mode 'globalized-minor-mode t)
(defvar cwarn-mode-major-mode nil nil)
(byte-code "\300\301!\210\302\303\304\305\306DD\307\310\311\312\313\314\315&	\207" [make-variable-buffer-local cwarn-mode-major-mode custom-declare-variable global-cwarn-mode funcall function #[0 "\300\207" [nil] 1 ""] "Non-nil if Global Cwarn mode is enabled.\nSee the `global-cwarn-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-cwarn-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean] 10)
#@452 Toggle Cwarn mode in all buffers.
With prefix ARG, enable Global Cwarn 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.

Cwarn mode is enabled in all buffers where
`turn-on-cwarn-mode-if-enabled' would do it.

See `cwarn-mode' for more information on Cwarn mode.

(fn &optional ARG)
(defalias 'global-cwarn-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-cwarn-mode cwarn-mode current-message set-default toggle default-value 1 nil t boundp delq add-hook after-change-major-mode-hook global-cwarn-mode-enable-in-buffers find-file-hook global-cwarn-mode-check-buffers change-major-mode-hook global-cwarn-mode-cmhh remove-hook buffer-list turn-on-cwarn-mode-if-enabled -1 run-hooks global-cwarn-mode-hook global-cwarn-mode-on-hook global-cwarn-mode-off-hook called-interactively-p any customize-mark-as-set message "Global Cwarn mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 9064) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar global-cwarn-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-cwarn-mode-map global-cwarn-mode-hook variable-documentation put "Hook run after entering or leaving `global-cwarn-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-cwarn-mode boundp] 6)
(defvar cwarn-mode-set-explicitly nil nil)
(make-variable-buffer-local 'cwarn-mode-set-explicitly)
(defalias 'cwarn-mode-set-explicitly #[0 "\301\211\207" [cwarn-mode-set-explicitly t] 2])
(byte-code "\300\301\302\303#\210\304\305\301\"\207" [put cwarn-mode-set-explicitly definition-name global-cwarn-mode add-hook cwarn-mode-hook] 4)
(defvar global-cwarn-mode-buffers nil)
(defalias 'global-cwarn-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-cwarn-mode-buffers cwarn-mode-set-explicitly cwarn-mode-major-mode major-mode cwarn-mode nil buffer-live-p -1 turn-on-cwarn-mode-if-enabled] 5])
(put 'global-cwarn-mode-enable-in-buffers 'definition-name 'global-cwarn-mode)
(defalias 'global-cwarn-mode-check-buffers #[0 "\300 \210\301\302\303\"\207" [global-cwarn-mode-enable-in-buffers remove-hook post-command-hook global-cwarn-mode-check-buffers] 3])
(put 'global-cwarn-mode-check-buffers 'definition-name 'global-cwarn-mode)
(defalias 'global-cwarn-mode-cmhh #[0 "p\211\235\203
\266\202\211B\210\301\302\303\"\207" [global-cwarn-mode-buffers add-hook post-command-hook global-cwarn-mode-check-buffers] 3])
(byte-code "\300\301\302\303#\210\304\305!\210\306\307!\207" [put global-cwarn-mode-cmhh definition-name global-cwarn-mode provide cwarn run-hooks cwarn-load-hook] 4)