;ELC   
;;; Compiled
;;; in Emacs version 29.3
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require evil-core evil-common evil-ex] 2)#@206 Change the search module according to MODULE.
If MODULE is `isearch', then Emacs' isearch module is used.
If MODULE is `evil-search', then Evil's own interactive
search module is used.

(fn OPTION MODULE)
(defalias 'evil-select-search-module #[514 "\301\211\211\2032 \211@\302\303\304\"!\302\303\305\"!\306=\203$ \307#\266\202+ \307#\266A\266\202\202 \266\310\"\207" [evil-motion-state-map (forward backward word-forward word-backward unbounded-word-forward unbounded-word-backward next previous) intern format "evil-search-%s" "evil-ex-search-%s" isearch substitute-key-definition set-default] 11 (#$ . 180)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable evil-search-module funcall function #[0 "\300\207" [isearch] 1 ""] "The search module to be used.  May be either `isearch', for\nEmacs' isearch module, or `evil-search', for Evil's own\ninteractive search module.  N.b. changing this will not affect keybindings.\nTo swap out relevant keybindings, see `evil-select-search-module' function." :type (radio (const :tag "Emacs built-in isearch." :value isearch) (const :tag "Evil interactive search." :value evil-search)) :group evil :set evil-select-search-module :initialize evil-custom-initialize-pending-reset] 12)#@95 Push STRING into the appropriate search history (determined by FORWARD).

(fn STRING FORWARD)
(defalias 'evil-push-search-history #[514 "\211\203 \300\202	 \301J@\232?\205 \211JBL\207" [evil-search-forward-history evil-search-backward-history] 6 (#$ . 1479)])#@68 Search incrementally for user-entered text.

(fn FORWARD REGEXP-P)
(defalias 'evil-search-incrementally #[514 "\302!\306`\307\310\307\211\311 \210\312\216\313\216\314\315\316\310#\210\314\317\320\310#\210\2036 \303!\210\202: \321!\210\322\"\210\307)`U?\205\213 \203Y \203Y b\210\211`=\203\203 \323\230\204\203 \203p \324 \210\202s \325 \210\326 \210\203\203 \203\203 b\210\327\330\"!.\207" [search-nonincremental-instead isearch-search-fun-function evil-search-prompt isearch-forward evil-write-echo-area evil-echo-area-message evil-isearch-function nil t evil-echo-area-save #[0 "\300 \207" [evil-echo-area-restore] 1] #[0 "\300\301\302\303\304$\210\300\305\306\303\304$\207" [add-hook input-method-activate-hook evil-activate-input-method nil t input-method-deactivate-hook evil-deactivate-input-method] 5] remove-hook input-method-activate-hook evil-activate-input-method input-method-deactivate-hook evil-deactivate-input-method isearch-backward evil-push-search-history "" isearch-repeat-forward isearch-repeat-backward isearch-exit evil-flash-search-pattern evil-search-message inhibit-quit evil-input-method current-input-method isearch-string isearch-other-end] 9 (#$ . 1750)])#@177 Flash last search matches for duration of `evil-flash-delay'.
If ALL is non-nil, flash all matches. STRING is a message
to display in the echo area.

(fn STRING &optional ALL)
(defalias 'evil-flash-search-pattern #[513 "\306\307\310\f\203 \311\f!\210?\206 \312\230?\205b \313 \210\314\315\"\210\316\306\224\306\225\"\210\203E \317``\320 \210\204E \321 \210\322\323\324\317\325$\210\322\326\324\317\325$\210\322\323\327\317\325$\210\330\317#\211+\207" [case-fold-search isearch-case-fold-search isearch-search-fun-function lazy-highlight-initial-delay evil-flash-timer isearch-lazy-highlight-wrapped 0 evil-isearch-function #[256 "\300\301!\207" [evil-flash-hook t] 3 "\n\n(fn &optional ARG)"] cancel-timer "" evil-echo-area-save evil-echo "%s" isearch-highlight nil isearch-lazy-highlight-new-loop isearch-lazy-highlight-update add-hook pre-command-hook evil-flash-hook t evil-operator-state-exit-hook evil-clean-isearch-overlays run-at-time isearch-lazy-highlight-start isearch-lazy-highlight-end isearch-lazy-highlight-overlays evil-flash-delay] 11 (#$ . 2986)])#@57 Clean isearch overlays unless `this-command' is search.
(defalias 'evil-clean-isearch-overlays #[0 "\301\302\303\304#\210\305>?\205 \306 \207" [this-command remove-hook pre-command-hook evil-clean-isearch-overlays t (evil-search-backward evil-search-forward evil-search-next evil-search-previous evil-search-word-backward evil-search-word-forward) isearch-clean-overlays] 4 (#$ . 4081)])
(put 'evil-clean-isearch-overlays 'permanent-local-hook t)#@108 Disable hightlighting if `this-command' is not search.
Disable anyway if FORCE is t.

(fn &optional FORCE)
(defalias 'evil-flash-hook #[256 "\211\204\n \303>\204 \304 \210\305 \210\306\307\310!\210\n\203 \311\n!\210\312\313\314\310#\210\312\315\314\310#\207" [this-command isearch-lazy-highlight-last-string evil-flash-timer (evil-search-backward evil-search-forward evil-search-next evil-search-previous evil-search-word-backward evil-search-word-forward) evil-echo-area-restore isearch-dehighlight nil lazy-highlight-cleanup t cancel-timer remove-hook pre-command-hook evil-flash-hook evil-operator-state-exit-hook] 5 (#$ . 4536)])
(put 'evil-flash-hook 'permanent-local-hook t)#@396 Execute a search with a predicate function.
SEARCH-FUN is a search function (e.g. `re-search-forward') and
PREDICATE is a two-argument function satisfying the interface of
`isearch-filter-predicate', or `nil'.  STRING, BOUND, NOERROR and
COUNT are passed unchanged to SEARCH-FUN.  The first match
satisfying the predicate (or `nil') is returned.

(fn SEARCH-FUN PRED STRING BOUND NOERROR COUNT)
(defalias 'evil-search-with-predicate #[1542 "\30026 $\211\204 \301\300\302\"\266\202 \204$ \301\300\"\266\202 \303\224\303\225\"\2032 \301\300\"\210\210\202 \207" [done throw nil 0] 11 (#$ . 5227)])#@408 Return a search function.
If FORWARD is nil, search backward, otherwise forward.
If REGEXP-P is non-nil, the input is a regular expression.
If WRAP is non-nil, the search wraps around the top or bottom
of the buffer.
If PREDICATE is non-nil, it must be a function accepting two
arguments: the bounds of a match, returning non-nil if that match is
acceptable.

(fn &optional FORWARD REGEXP-P WRAP PREDICATE)
(defalias 'evil-search-function #[1024 "\300\301\302\303\304\305\203 	\203 \306\202\" \307\202\" 	\203! \310\202\" \311DD\312BB\313\314\315\304\316\317\f\2038 \320\2029 \321\322BBBBBBE\323\324\325BB\326\203R \327\202S \330D\331\313\314\315\304\332BBBE\333BBF\334BBBBE\207" [lambda (string &optional bound noerror count) let (start (point)) search-fun quote re-search-forward re-search-backward search-forward search-backward (result) setq result evil-search-with-predicate string bound t noerror (count) when and ((null result)) goto-char (point-min) (point-max) unwind-protect (string bound noerror count) ((unless result (goto-char start))) (result)] 19 (#$ . 5843)])#@97 Return a search function for use with isearch.
Based on `isearch-regexp' and `isearch-forward'.
(defalias 'evil-isearch-function #[0 "\303	\n\304$\207" [isearch-forward evil-regexp-search evil-search-wrap evil-search-function isearch-filter-predicate] 5 (#$ . 6940)])#@307 Search for STRING and highlight matches.
If FORWARD is nil, search backward, otherwise forward.
If REGEXP-P is non-nil, STRING is taken to be a regular expression.
START is the position to search from; if unspecified, it is
one more than the current position.

(fn STRING FORWARD &optional REGEXP-P START)
(defalias 'evil-search #[1026 ";\205\263 \306\230?\205\263 `\206 \203 dT^\202 \211\n\205+ \307\310\"??\2050 \311\f\312$\313\314G\310\n$\210b\210\315\"\210\3161[ \211!0\210\202o \210b\210\317\320\203l \321\202m \322#\210\314\224b\210\203\213 `W\203\213 \203\205 \323 \210\324\262\202\253 \204\243 `V\203\243 \203\235 \323 \210\325\262\202\253 \326\"\262\327\330\"+\266\203\207" [isearch-regexp isearch-forward search-upper-case case-fold-search evil-search-wrap isearch-string "" isearch-no-upper-case-p nil evil-search-function isearch-filter-predicate set-text-properties 0 isearch-update-ring (search-failed) user-error "\"%s\": %s not found" "pattern" "string" ding "Search wrapped around BOTTOM of buffer" "Search wrapped around TOP of buffer" evil-search-message evil-flash-search-pattern t evil-search-wrap-ring-bell] 12 (#$ . 7215)])#@222 Search for word near point.
If FORWARD is nil, search backward, otherwise forward. If SYMBOL
is non-nil then the functions searches for the symbol at point,
otherwise for the word at point.

(fn FORWARD UNBOUNDED SYMBOL)
(defalias 'evil-search-word #[771 "@\n\303>\203 \211;\203 \211\304\230\204 \305\306#\207\307\203% \310\202& \311\"\262\211\2044 \312\313!\210\202P \203@ \314!\262\202P \315\203I \316\202J \317\314!\"\262\320\"\210\305\306#\207" [regexp-search-ring isearch-forward last-command (evil-search-word-forward evil-search-word-backward) "" evil-search t evil-find-thing symbol evil-word user-error "No word under point" regexp-quote format "\\_<%s\\_>" "\\<%s\\>" evil-push-search-history] 8 (#$ . 8421)])#@257 Return a cons of THING near point as a string and its position.
THING should be a symbol understood by `thing-at-point',
e.g. `symbol' or `word'.  If FORWARD is nil, search backward,
otherwise forward.  Returns nil if nothing is found.

(fn FORWARD THING)
(defalias 'evil--find-thing #[514 "\203 \300\202	 \301\203 \302\202 \303\304\212\305!\262\211\204-  \204-  \210\305!\262\202 \211;\203: \306\307G\304$\210\211G\307V\205D \211`B)\207" [forward-char backward-char eobp bobp nil thing-at-point set-text-properties 0] 10 (#$ . 9168)])#@232 Return a THING near point as a string.
THING should be a symbol understood by `thing-at-point',
e.g. `symbol' or `word'.  If FORWARD is nil, search backward,
otherwise forward.  Returns nil if nothing is found.

(fn FORWARD THING)
(defalias 'evil-find-thing #[514 "\300\"@\207" [evil--find-thing] 5 (#$ . 9724)])#@140 Return word near point as a string.
If FORWARD is nil, search backward, otherwise forward.  Returns
nil if nothing is found.

(fn FORWARD)
(defalias 'evil-find-word #[257 "\300\301\"\207" [evil-find-thing word] 4 (#$ . 10045)])#@140 Return word near point as a string.
If FORWARD is nil, search backward, otherwise forward.  Returns
nil if nothing is found.

(fn FORWARD)
(defalias 'evil-find-symbol #[257 "\300\301\"\207" [evil-find-thing symbol] 4 (#$ . 10280)])#@65 Return the search prompt for the given direction.

(fn FORWARD)
(defalias 'evil-search-prompt #[257 "\211\203 \300\207\301\207" ["/" "?"] 2 (#$ . 10518)])#@60 Prefix STRING with the search prompt.

(fn STRING FORWARD)
(defalias 'evil-search-message #[514 "\300\301\302!#\207" [format "%s%s" evil-search-prompt] 6 (#$ . 10679)])
(advice-add 'isearch-message-prefix :around 'evil--use-search-prompt)#@53 Use `evil-search-prompt'.

(fn ORIG-FUN &rest ARGS)
(defalias 'evil--use-search-prompt #[385 "\206 \301\"\207" [evil-search-prompt apply] 5 (#$ . 10925)])
(advice-add 'isearch-delete-char :around 'evil--exit-search-when-empty)#@60 Exit search if no search string.

(fn ORIG-FUN &rest ARGS)
(defalias 'evil--exit-search-when-empty #[385 "\203 	\304\230\203 \305\211\306 )\207\307\"\207" [evil-search-prompt isearch-string search-nonincremental-instead isearch-success "" nil isearch-exit apply] 6 (#$ . 11161)])
(advice-add 'isearch-lazy-highlight-search :around 'evil--without-search-wrap)#@66 Never wrap the search in this context.

(fn ORIG-FUN &rest ARGS)
(defalias 'evil--without-search-wrap #[385 "\301\302\")\207" [evil-search-wrap nil apply] 5 (#$ . 11532)])#@78 Return the regular expression without all occurrences of \c and \C.

(fn RE)
(defalias 'evil-ex-regex-without-case #[257 "\300\301\"\207" [evil-transform-regexp ((99 . #1="") (67 . #1#))] 4 (#$ . 11712)])#@578 Return the case as implied by \c or \C in regular expression RE.
If \c appears anywhere in the pattern, the pattern is case
insensitive. If \C appears, the pattern is case sensitive.
Only the first occurrence of \c or \C is used, all others are
ignored. If neither \c nor \C appears in the pattern, the case
specified by DEFAULT-CASE is used. DEFAULT-CASE should be either
`sensitive', `insensitive' or `smart'. In the latter case, the pattern
will be case-sensitive if and only if it contains an upper-case
letter, otherwise it will be case-insensitive.

(fn RE DEFAULT-CASE)
(defalias 'evil-ex-regex-case #[514 "\300\301\"\203 \302\303\"\304H\305=\203 \306\207\307\207\211\310=\203' \311\312\"\203% \306\207\307\207\207" [string-match "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\\\\\([cC]\\)" match-string 1 0 99 insensitive sensitive smart isearch-no-upper-case-p t] 5 (#$ . 11924)])#@162 Create a PATTERN for substitution with FLAGS.
This function respects the values of `evil-ex-substitute-case'
and `evil-ex-substitute-global'.

(fn REGEXP FLAGS)
(defalias 'evil-ex-make-substitute-pattern #[514 "\303\304>\203\f \305\202 \306>\203 \307\202 \204 	\202 \310>\203* \n?\202+ \n#\207" [evil-ex-substitute-case evil-ex-search-case evil-ex-substitute-global evil-ex-make-pattern 105 insensitive 73 sensitive 103] 7 (#$ . 12817)])#@103 Create a PATTERN for search.
This function respects the values of `evil-ex-search-case'.

(fn REGEXP)
(defalias 'evil-ex-make-search-pattern #[257 "\301\302#\207" [evil-ex-search-case evil-ex-make-pattern t] 5 (#$ . 13272)])#@702 Create a new search pattern.
REGEXP is the regular expression to be searched for. CASE should
be either `sensitive', `insensitive' for case-sensitive and
case-insensitive search respectively, or `smart'.  In the latter case
the pattern is smart-case, i.e. it is automatically sensitive of the
pattern contains an upper case letter, otherwise it is insensitive.
The input REGEXP is considered a Vim-style regular expression if
`evil-ex-search-vim-style-regexp' is non-nil, in which case it is
transformed to an Emacs style regular expression (i.e. certain
backslash-codes are transformed.  Otherwise REGEXP must be an Emacs
style regular expression and is not transformed.

(fn REGEXP CASE WHOLE-LINE)
(defalias 'evil-ex-make-pattern #[771 "\301!\302\"\303=\203% \304\305\"\204% \306\307\"\204% \310!\262\202+ \311\312\"\262E\207" [evil-ex-search-vim-style-regexp evil-ex-regex-without-case evil-ex-regex-case insensitive string-prefix-p "\\_<" string-suffix-p "\\_>" evil-transform-vim-style-regexp evil-transform-regexp ((116 . "	") (110 . "\n") (114 . ""))] 8 (#$ . 13505)])#@66 Return the regular expression of a search PATTERN.

(fn PATTERN)
(defalias 'evil-ex-pattern-regex #[257 "\211@\207" [] 2 (#$ . 14603)])#@67 Return t if and only if PATTERN should ignore case.

(fn PATTERN)
(defalias 'evil-ex-pattern-ignore-case #[257 "\211A@\207" [] 2 (#$ . 14744)])#@138 Return t if and only if PATTERN should match all occurences of a line.
Otherwise PATTERN matches only the first occurence.

(fn PATTERN)
(defalias 'evil-ex-pattern-whole-line #[257 "\3008\207" [2] 3 (#$ . 14894)])#@72 compiler-macro for inlining `evil-ex-hl-name'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-name--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-name (progn (aref cl-x 0))) nil] 9 (#$ . 15114)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-name compiler-macro evil-ex-hl-name--cmacro] 4)#@60 Access slot "name" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-name #[257 "\211\300H\207" [0] 3 (#$ . 15483)])
(byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put evil-ex-hl-name side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" evil-ex-hl-name] 5 "\n\n(fn CL-DO CL-X)"]] 5)#@75 compiler-macro for inlining `evil-ex-hl-pattern'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-pattern--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-pattern (progn (aref cl-x 1))) nil] 9 (#$ . 15839)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-pattern compiler-macro evil-ex-hl-pattern--cmacro] 4)#@63 Access slot "pattern" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-pattern #[257 "\211\300H\207" [1] 3 (#$ . 16223)])
(byte-code "\300\301\302\303#\300\207" [function-put evil-ex-hl-pattern side-effect-free t] 4)#@72 compiler-macro for inlining `evil-ex-hl-face'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-face--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-face (progn (aref cl-x 2))) nil] 9 (#$ . 16458)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-face compiler-macro evil-ex-hl-face--cmacro] 4)#@60 Access slot "face" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-face #[257 "\211\300H\207" [2] 3 (#$ . 16827)])
(byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put evil-ex-hl-face side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" evil-ex-hl-face] 5 "\n\n(fn CL-DO CL-X)"]] 5)#@74 compiler-macro for inlining `evil-ex-hl-window'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-window--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-window (progn (aref cl-x 3))) nil] 9 (#$ . 17183)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-window compiler-macro evil-ex-hl-window--cmacro] 4)#@62 Access slot "window" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-window #[257 "\211\300H\207" [3] 3 (#$ . 17562)])
(byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put evil-ex-hl-window side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" evil-ex-hl-window] 5 "\n\n(fn CL-DO CL-X)"]] 5)#@71 compiler-macro for inlining `evil-ex-hl-min'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-min--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-min (progn (aref cl-x 4))) nil] 9 (#$ . 17926)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-min compiler-macro evil-ex-hl-min--cmacro] 4)#@105 Access slot "min" of `evil-ex-hl' struct CL-X.
The minimal buffer position of the highlight.

(fn CL-X)
(defalias 'evil-ex-hl-min #[257 "\211\300H\207" [4] 3 (#$ . 18291)])
(byte-code "\300\301\302\303#\300\207" [function-put evil-ex-hl-min side-effect-free t] 4)#@71 compiler-macro for inlining `evil-ex-hl-max'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-max--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-max (progn (aref cl-x 5))) nil] 9 (#$ . 18560)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-max compiler-macro evil-ex-hl-max--cmacro] 4)#@105 Access slot "max" of `evil-ex-hl' struct CL-X.
The maximal buffer position of the highlight.

(fn CL-X)
(defalias 'evil-ex-hl-max #[257 "\211\300H\207" [5] 3 (#$ . 18925)])
(byte-code "\300\301\302\303#\300\207" [function-put evil-ex-hl-max side-effect-free t] 4)#@78 compiler-macro for inlining `evil-ex-hl-match-hook'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-match-hook--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-match-hook (progn (aref cl-x 6))) nil] 9 (#$ . 19194)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-match-hook compiler-macro evil-ex-hl-match-hook--cmacro] 4)#@66 Access slot "match-hook" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-match-hook #[257 "\211\300H\207" [6] 3 (#$ . 19593)])
(byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put evil-ex-hl-match-hook side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" evil-ex-hl-match-hook] 5 "\n\n(fn CL-DO CL-X)"]] 5)#@79 compiler-macro for inlining `evil-ex-hl-update-hook'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-update-hook--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-update-hook (progn (aref cl-x 7))) nil] 9 (#$ . 19973)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-update-hook compiler-macro evil-ex-hl-update-hook--cmacro] 4)#@67 Access slot "update-hook" of `evil-ex-hl' struct CL-X.

(fn CL-X)
(defalias 'evil-ex-hl-update-hook #[257 "\211\300H\207" [7] 3 (#$ . 20377)])
(byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put evil-ex-hl-update-hook side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" evil-ex-hl-update-hook] 5 "\n\n(fn CL-DO CL-X)"]] 5)#@76 compiler-macro for inlining `evil-ex-hl-overlays'.

(fn CL-WHOLE-ARG CL-X)
(defalias 'evil-ex-hl-overlays--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block evil-ex-hl-overlays (progn (aref cl-x 8))) nil] 9 (#$ . 20761)])
(byte-code "\300\301\302\303#\300\207" [define-symbol-prop evil-ex-hl-overlays compiler-macro evil-ex-hl-overlays--cmacro] 4)#@102 Access slot "overlays" of `evil-ex-hl' struct CL-X.
The active overlays of the highlight.

(fn CL-X)
(defalias 'evil-ex-hl-overlays #[257 "\211\300H\207" [8] 3 (#$ . 21151)])
(byte-code "\300\301\302\303#\304\305\306\211\307\306\310\311\305\306&	\207" [function-put evil-ex-hl-overlays side-effect-free t cl-struct-define evil-ex-hl nil vector ((name nil :read-only t) (pattern) (face nil :read-only t) (window nil :read-only t) (min nil :documentation "The minimal buffer position of the highlight.") (max nil :documentation "The maximal buffer position of the highlight.") (match-hook nil :read-only t) (update-hook nil :read-only t) (overlays nil :documentation "The active overlays of the highlight.")) cl-struct-evil-ex-hl-tags] 11)#@1046 Create a new highlight object with name NAME and properties ARGS.
The following properties are supported:
:face The face to be used for the highlighting overlays.
:win The window in which the highlighting should be shown.
     Note that the highlight will be visible in all windows showing
     the corresponding buffer, but only the matches visible in the
     specified window will actually be highlighted. If :win is nil,
     the matches in all windows will be highlighted.
:min The minimal buffer position for highlighted matches.
:max The maximal buffer position for highlighted matches.
:match-hook A hook to be called once for each highlight.
            The hook must take two arguments, the highlight and
            the overlay for that highlight.
:update-hook A hook called once after updating the highlighting
             with two arguments, the highlight and a message string
             describing the current match status.

(fn NAME &key (FACE \='evil-ex-lazy-highlight) (WIN (selected-window)) MIN MAX MATCH-HOOK UPDATE-HOOK)
(defalias 'evil-ex-make-hl #[385 "\301\302\"\206 \303A@\301\304\"\206 \305\306 DA@\301\307\"A@\301\310\"A@\301\311\"A@\301\312\"A@\211\203h \211@\313>\203P \211A\204H \314\315@\"\210\211AA\262\2022 \316>A@\203_ \305\262\2022 \314\317@\"\210\2022 \2109\204s \320\321!\210\236\203 \322!\210\204\220 \323\324\325\305\326$\210\323\327\330\305#\210\331	\305						\305&	BB\211\207" [evil-ex-active-highlights-alist plist-member :face (nil evil-ex-lazy-highlight) :win nil selected-window :min :max :match-hook :update-hook (:face :win :min :max :match-hook :update-hook :allow-other-keys) error "Missing argument for %s" :allow-other-keys "Keyword argument %s not one of (:face :win :min :max :match-hook :update-hook)" user-error "Expected symbol as name of highlight" evil-ex-delete-hl add-hook window-scroll-functions evil-ex-hl-update-highlights-scroll t window-size-change-functions evil-ex-hl-update-highlights-resize vector] 19 (#$ . 21896)])#@64 Remove the highlighting object with a certain NAME.

(fn NAME)
(defalias 'evil-ex-delete-hl #[257 "\211\236A\211\203 \301\302\303H\"\210\304\"\305 \210?\205& \306\307\310\311#\210\306\312\313\"\207" [evil-ex-active-highlights-alist mapc delete-overlay 8 assq-delete-all evil-ex-hl-update-highlights remove-hook window-scroll-functions evil-ex-hl-update-highlights-scroll t window-size-change-functions evil-ex-hl-update-highlights-resize] 6 (#$ . 23927)])#@65 Whether the highlight with a certain NAME is active.

(fn NAME)
(defalias 'evil-ex-hl-active-p #[257 "\211\236\205 \301\207" [evil-ex-active-highlights-alist t] 3 (#$ . 24395)])#@77 Set the regular expression of highlight NAME to PATTERN.

(fn NAME PATTERN)
(defalias 'evil-ex-hl-change #[514 "\236A\211\205 \211\301I\210\302 \207" [evil-ex-active-highlights-alist 1 evil-ex-hl-idle-update] 6 (#$ . 24580)])#@102 Set minimal and maximal position of highlight NAME to BEG and END.

(fn NAME BEG END &optional TYPE)
(defalias 'evil-ex-hl-set-region #[1027 "\236A\211\205 \211\301I\210\211\302I\210\303 \207" [evil-ex-active-highlights-alist 4 5 evil-ex-hl-idle-update] 8 (#$ . 24816)])#@73 Return the maximal position of the highlight with name NAME.

(fn NAME)
(defalias 'evil-ex-hl-get-max #[257 "\211\236A\211\205 \211\301H\207" [evil-ex-active-highlights-alist 5] 4 (#$ . 25097)])#@47 Update the overlays of all active highlights.
(defalias 'evil-ex-hl-update-highlights #[0 "\304\305\"\211\205 \211@\211\306H\307\310H\311!\211\312H\313H\307\203\371\307\211\314=\2032 \315p\307\316#\2027 \317HC\211\203r \211@\320!\203k \321!\322H\206N e]\323!\f\324H\206Z d^W\203i BB\262\266A\266\202\2027 \210\325\326\"\262\203\275 \211A\262\242\211A\262\242\211\204\225 B\266\203\202y A@Y\203\256 @AA]BB\262\266\202y B\262\211B\262\266\202y \3271\355\3301\343\3311\330\332 \333\334\"\216\211\203|\211@\211@A\212b\210m\204r\335!\203r\336\225X\203r\336\224U\203\212\336\224b\210n)\204r\f\211A\262\242\206\337\336\211\"\340\336\224\336\225#\210\341\342#\210\341\343\336H#\210\341\344\345#\210\211B\262	\203@	\"\210\210\346!\204]\212\336\224b\210\347\350\336\225\316#)\204]\307y\210\202\337 \336\224\336\225U\203k\307u\210\202\337 \336\225b\210\202\337 )\266A\266\202\202\321 \210\351\352\n\"\210	\306	I\210\203\224\203\233\316\211\262\202\315\212	\322H\206\244eb\210\335!\203\310\336\225\n\324H\206\267dW\203\310\353\354\355\336\224!\"\211\262\202\314\356\211\262))\262000\266\20200\211A@\211\266\205\2020\3128\211\266\205\202\353\357A@\"\211\266\205\202\351\352\"\210\306I\210\360H\203\360H\"\210*\266A\266\202\202 \207" [evil-ex-active-highlights-alist case-fold-search case-replace evil-ex-interactive-search-highlight mapcar cdr 8 nil 1 evil-ex-pattern-ignore-case 2 6 all-windows get-buffer-window-list t 3 window-live-p window-start 4 window-end 5 sort car-less-than-car (error) (search-failed) (invalid-regexp) match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] evil-ex-search-find-next-pattern 0 make-overlay move-overlay overlay-put face evil-ex-hl priority 1000 evil-ex-pattern-whole-line search-forward "\n" mapc delete-overlay format "Match in line %d" line-number-at-pos "No match" "%s" 7] 22 (#$ . 25299)])#@167 Look for the next occurrence of PATTERN in a certain DIRECTION.
Note that this function ignores the whole-line property of PATTERN.

(fn PATTERN &optional DIRECTION)
(defalias 'evil-ex-search-find-next-pattern #[513 "\211\206 \301\262\302!\211\303\267\202k \304\305!\306\307#\202o `\310\305!\306\307#\211\205) \311 \2033 \306u\210\2026 eb\210\304\305!\306\307#\211\203R \312\224W\203R \211\262\312\224b\202d \203` \313!\210\312\224b\202d b\210\262\266\203\202o \314\315\")\207" [case-fold-search forward evil-ex-pattern-ignore-case #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (forward 17 backward 27)) re-search-forward evil-ex-pattern-regex nil t re-search-backward match-data 0 set-match-data user-error "Unknown search direction `%s'"] 9 (#$ . 27296)])#@67 Trigger the timer to update the highlights in the current buffer.
(defalias 'evil-ex-hl-idle-update #[0 "\205 	\205 \n\203 \304\n!\210\305\306\307p$\211\207" [evil-ex-interactive-search-highlight evil-ex-active-highlights-alist evil-ex-hl-update-timer evil-ex-hl-update-delay cancel-timer run-at-time nil evil-ex-hl-do-update-highlight] 5 (#$ . 28115)])#@68 Timer function for updating the highlights.

(fn &optional BUFFER)
(defalias 'evil-ex-hl-do-update-highlight #[256 "\301!\203 r\211q\210\302 )\210\303\211\207" [evil-ex-hl-update-timer buffer-live-p evil-ex-hl-update-highlights nil] 3 (#$ . 28480)])#@65 Update highlights after scrolling in some window.

(fn WIN BEG)
(defalias 'evil-ex-hl-update-highlights-scroll #[514 "r\300!q\210\301 )\207" [window-buffer evil-ex-hl-idle-update] 4 (#$ . 28738)])
(put 'evil-ex-hl-update-highlights-scroll 'permanent-local-hook t)#@56 Update highlights after resizing a window.

(fn FRAME)
(defalias 'evil-ex-hl-update-highlights-resize #[257 "\300\301\302\303!\"!\211\211\205 \211@r\211q\210\304 )\210A\266\202\202	 \207" [delete-dups mapcar window-buffer window-list evil-ex-hl-idle-update] 6 (#$ . 29008)])
(put 'evil-ex-hl-update-highlights-resize 'permanent-local-hook t)#@177 Activate highlighting of the search pattern set to PATTERN.
This function does nothing if `evil-ex-search-interactive' or
`evil-ex-search-highlight-all' is nil. 

(fn PATTERN)
(defalias 'evil-ex-search-activate-highlight #[257 "\205+ 	\205+ r\n\206 pq\210\303\304!\204\" \305\304\306\307 \206  \310 #\210\211\205* \311\304\")\207" [evil-ex-search-interactive evil-ex-search-highlight-all evil-ex-original-buffer evil-ex-hl-active-p evil-ex-search evil-ex-make-hl :win minibuffer-selected-window selected-window evil-ex-hl-change] 5 (#$ . 29359)])#@208 Search forward or backward COUNT times for the current Ex search pattern.
The search pattern is determined by `evil-ex-search-pattern', and the
direction by `evil-ex-search-direction'.

(fn &optional COUNT)
(defalias 'evil-ex-search #[256 "`\306\211\206	 \307\262`\310\206 \307\311\211W\203d \310\n\312=\2036 m\2046 \310u\210\2046 l\2036 m\2046 \310u\210\313\310\211\f?#\211\314\267\266\202] b\210\315\316\317!C\"\266\202] \306\262\266\202] \266\211T\262\202 \266\211\203z \310\203u \320 \210\321\322!)\210\311\224b\210\311\224\311\225\323!\210\324!\207" [evil-ex-search-start-point evil-ex-last-was-search evil-ex-search-direction evil-move-beyond-eol evil-search-wrap evil-ex-search-pattern t 1 nil 0 forward evil-ex-find-next #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (nil 68 wrapped 83)) signal search-failed evil-ex-pattern-regex ding message "Search wrapped" evil-ex-search-goto-offset evil-ex-search-activate-highlight message-log-max evil-search-wrap-ring-bell evil-ex-search-match-beg evil-ex-search-match-end evil-ex-search-offset] 11 (#$ . 29915)])#@697 Search for the next occurrence of the PATTERN in DIRECTION.
PATTERN must be created using `evil-ex-make-pattern', DIRECTION is
either `forward' or `backward'. If NOWRAP is non-nil, the search does
not wrap at buffer boundaries. Furthermore this function only searches
invisible text if `search-invisible' is t. If PATTERN is not specified
the current global pattern `evil-ex-search-pattern' and if DIRECTION
is not specified the current global direction
`evil-ex-search-direction' is used. This function returns t if the
search was successful, nil if it was unsuccessful and `wrapped' if the
search was successful but wrapped around at buffer boundaries.

(fn &optional PATTERN DIRECTION NOWRAP)
(defalias 'evil-ex-find-next #[768 "\206 \262\206\f 	\262\203 \303!\204 \304\305\306C\"\210\3072k \310\311\"\203I \n\312=\2049 \313\314\224\314\225\"\204# \315\307\203C \316\202D \312\"\210\202# \203U \315\307\310\"\210\202# \312\262\312\262\317=\203e e\202f db\210\202# \207" [evil-ex-search-pattern evil-ex-search-direction search-invisible evil-ex-pattern-regex signal search-failed "No search pattern" done nil evil-ex-search-find-next-pattern t isearch-range-invisible 0 throw wrapped forward] 7 (#$ . 31052)])#@181 Update the highlighting for the search pattern.
PATTERN is the search pattern and OFFSET the associated offset.
BEG and END specify the current match.

(fn PATTERN OFFSET BEG END)
(defalias 'evil-ex-search-update #[1028 "\2036 \211\2036 \203 \303#\210\202& \304\"\305\306\307#\210\305\310\311#\210b\210\312!\210	\205K \313\311\"\207\203@ \314!\210\315	\203I \313\311\315\"\210\nb\207" [evil-ex-search-overlay evil-ex-search-highlight-all evil-ex-search-start-point move-overlay make-overlay overlay-put priority 1001 face evil-ex-search evil-ex-search-goto-offset evil-ex-hl-change delete-overlay nil] 8 (#$ . 32287)])#@80 Timer to coalesce `evil-ex-search-update-pattern' calls after pattern changes.
(defvar evil--ex-search-update-timer nil (#$ . 32928))#@24 

(fn BEG END OLD-LEN)
(defalias 'evil-ex-search-after-change-function #[771 "\203 \301!\210\302\303\304\305#\211\207" [evil--ex-search-update-timer cancel-timer run-with-idle-timer 0 nil evil-ex-search-update-pattern] 7 (#$ . 33067)])#@39 Initialize Ex for interactive search.
(defalias 'evil-ex-search-start-session #[0 "\302\303\304\305\306$\210\203 	\203 \302\307\310\305\306$\210\302\311\312\305\306$\210\302\313\314\"\210\315\305!\207" [evil-ex-search-interactive evil-ex-search-incremental add-hook pre-command-hook evil-ex-remove-default nil t after-change-functions evil-ex-search-after-change-function minibuffer-exit-hook evil-ex-search-stop-session mouse-leave-buffer-hook evil-ex-search-exit evil-ex-search-activate-highlight] 5 (#$ . 33312)])
(defvar evil-ex-search-yank-point nil)#@26 Stop interactive search.
(defalias 'evil-ex-search-stop-session #[0 "rq\210\305	!\306 )\210\307\310\311\"\210\n\203 \312\n!\210\313\203% \314!\210\313\313\211\207" [evil-ex-original-buffer isearch-opened-overlays evil--ex-search-update-timer evil-ex-search-overlay evil-ex-search-yank-point delete-dups isearch-clean-overlays remove-hook mouse-leave-buffer-hook evil-ex-search-exit cancel-timer nil delete-overlay] 3 (#$ . 33876)])#@127 Split PATTERN in regexp, offset and next-pattern parts.
Return a triplet (REGEXP OFFSET NEXT-SEARCH).

(fn PATTERN DIRECTION)
(defalias 'evil-ex-split-search-pattern #[514 "\300\301=\203 \302\202\f \303\"\203  \304\305\224O\306\307\"\306\310\"E\207\311\211E\207" [string-match forward "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\(/\\([^;]*\\)\\(?:;\\([/?].*\\)?\\)?\\)?$" "\\(?:^\\|[^\\\\]\\)\\(?:\\\\\\\\\\)*\\(\\?\\([^;]*\\)\\(?:;\\([/?].*\\)?\\)?\\)?$" 0 1 match-string 2 3 nil] 7 (#$ . 34322)])#@1049 Search for a full search pattern STRING in DIRECTION.
This function splits STRING into "pattern/offset/;next-pattern"
parts and performs the search in DIRECTION which must be either
`forward' or `backward'. The first search is repeated COUNT times. If
the pattern part of STRING is empty, the last global pattern stored in
`evil-ex-search-pattern' is used instead if in addition the offset
part is nil (i.e. no pattern/offset separator), the last global offset
stored in `evil-ex-search-offset' is used as offset. The current match
data will correspond to the last successful match. This function
returns a triplet (RESULT PATTERN OFFSET) where RESULT is one of

  t               the search was successful without wrapping
  `wrap'          the search was successful with wrapping
  `empty-pattern' the last pattern was empty
  nil             the search was unsuccessful

and PATTERN and OFFSET are the last pattern and offset this
function searched for. Note that this function does not handle
any error conditions.

(fn STRING COUNT DIRECTION)
(defalias 'evil-ex-search-full-pattern #[771 "\206 \303\262\3042\305\"\211A\262\242\211A\262\242\211A\262\242\306\211\211G\307V\2036 \310!\262\202L \206C \311\304\312		E\"\262\206J 	\262	\307V\203w \313\n\n?#\206g \311\304\306		E\"\314=\203o \315\262	S\262\n\202L G\307U\203\231 \316!\210\311\304\203\215 \317\202\216 \315		E\"\266	\202 G\303U\203\311 \316!\210\320\230\203\257 \321\202\260 \322\262=\203\275 \303\202\276 \323\262\n\262\266\211\202 \316!\210\307H\324U\203\332 \321\202\333 \322\262\323GX\205\352 \307\323O\325\235\262=\204\367 \204\373 \303\202\374 \323\262\n\203\303\306OP\202\303\306O\262\266\211\202 \207" [evil-ex-search-pattern evil-ex-search-offset evil-search-wrap 1 done evil-ex-split-search-pattern nil 0 evil-ex-make-search-pattern throw empty-pattern evil-ex-find-next wrapped t evil-ex-search-goto-offset wrap "/" forward backward 2 47 ("//" "??")] 16 (#$ . 34830)])#@36 Update the current search pattern.
(defalias 'evil-ex-search-update-pattern #[0 "\303 \304\305\306 !r\307\310\"\216\311@\312\"\210Tb\210\3131\241 \3141\216 \315	\206& \316\n#\211G\317U\2038 \211A\262\242\202? \320\321\322GD\"\211A\262\242\242\323\267\202j \324\325\224\325\225$\210\326\211\262\266\204\202\210 \324\304\211\211\211$\266\204\202\210 \203{ \324\325\224\325\225$\266\204\202\210 \324\304\211\211\211$\210\327\211\262\266\20400\210\202\260 0\324\304\211\211\211$\210\211A@\211\262\266\202\260 \324\304\211\211\211$\210\330!\211\262\266*\210\211\205\272 \331\332\"\207" [evil-ex-search-start-point evil-ex-search-count evil-ex-search-direction minibuffer-contents-no-properties nil internal--before-with-selected-window minibuffer-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord (error) (invalid-regexp) evil-ex-search-full-pattern 1 3 signal wrong-number-of-arguments (success pattern offset) #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (wrap 77 empty-pattern 95)) evil-ex-search-update 0 "Wrapped" "Search failed" error-message-string evil-ex-echo "%s"] 12 (#$ . 36853)])#@60 Exit interactive search, keeping lazy highlighting active.
(defalias 'evil-ex-search-exit #[0 "\300 \207" [exit-minibuffer] 1 (#$ . 38077) nil])#@56 Abort interactive search, disabling lazy highlighting.
(defalias 'evil-ex-search-abort #[0 "\300\301!\210\302 \207" [evil-ex-delete-hl evil-ex-search abort-recursive-edit] 2 (#$ . 38227) nil])#@178 Move point according to search OFFSET and set `evil-this-type' accordingly.
This function assumes that the current match data represents the
current search result.

(fn OFFSET)
(defalias 'evil-ex-search-goto-offset #[257 "\211G\301U?\205\201 \301\224\301\225\302 \303\304\"\216\305\306\"\204 \307\310\"\210\311\224\311\225U\203A \312\224\2040 \301\202H \312\224H\313U\203= \314\202H \315\202H \316\317\320\"!\314\224\204T \321\211y\202z \314\224H\322U\203i \\Sb\210\323\211\202z \314\224H\324>\205z \\b\210\323\211)\262\262\266\202\207" [evil-this-type 0 match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] string-match "^\\([esb]\\)?\\(\\([-+]\\)?\\([0-9]*\\)\\)$" user-error "Invalid search offset: %s" 4 3 43 1 -1 string-to-number match-string 2 line 101 inclusive (115 98)] 8 (#$ . 38426)])#@66 Start a new search in a certain DIRECTION.

(fn DIRECTION COUNT)
(defalias 'evil-ex-start-search #[514 "\211`\306p%\3071H \310\311\312!\211\313\314#M\210\313\315\"\216\316\317\"\210\320	\321=\2032 \322\2023 \323\205? \324@\325\326#\327#)\266\2020\202W \330\331!\210\nb\210\332@A\"\262	\321=\203b \nT\202d \nSb\210\333	#\211G\334U\203{ \211A\262\242\202\202 \332\335\336GD\"\211A\262\242\242&\211'\337>\203\316 \340\224b\210\340\224(\340\225)\341!\210\342\321=\"\210*\203\301 +?\205\333 \330\331!\266\204\202\335 ,\205\333 \343!\266\204\202\335 \nb\210\330\331!\210\332\344C\"\266\204*\207" [evil-ex-search-count evil-ex-search-direction evil-ex-search-start-point evil-ex-last-was-search evil-ex-original-buffer evil-ex-search-keymap t (quit) evil-ex-search-start-session make-symbol "minibuffer-setup" make-closure #[0 "\302\303\300\"\210\301 \207" [V0 V1 remove-hook minibuffer-setup-hook] 3] #[0 "\301\302\300\"\207" [V0 remove-hook minibuffer-setup-hook] 3] add-hook minibuffer-setup-hook read-string forward "/" "?" propertize face shadow evil-ex-search-history evil-ex-delete-hl evil-ex-search signal evil-ex-search-full-pattern 3 wrong-number-of-arguments (success pattern offset) (t wrap) 0 evil-ex-search-goto-offset evil-push-search-history evil-ex-search-activate-highlight search-failed minibuffer-local-map evil-ex-search-pattern evil-ex-search-offset evil-ex-search-match-beg evil-ex-search-match-end evil-ex-search-incremental evil-ex-search-persistent-highlight evil-ex-search-highlight-all] 11 (#$ . 39266)])#@460 Search for the symbol under point.
The search matches the COUNT-th occurrence of the word.  If the
UNBOUNDED argument is nil, the search matches only at symbol
boundaries, otherwise it matches anywhere.  The DIRECTION
argument should be either `forward' or `backward', determining
the search direction. If SYMBOL is non-nil then the functions
searches for the symbol at point, otherwise for the word at
point.

(fn UNBOUNDED DIRECTION COUNT &optional SYMBOL)
(defalias 'evil-ex-start-word-search #[1027 "\306\307=\203\f \310\202 \311\"\206 \312\313!\203 \314!\202, \315\203' \316\202( \317\314!\"\320\321!)\320\322\211@\232\204I \211B\323\307=\"\266\324\325!\210\326!\207" [evil-ex-search-count evil-ex-search-direction evil-ex-search-vim-style-regexp evil-ex-search-pattern evil-ex-search-offset evil-ex-last-was-search evil-find-thing forward symbol word user-error "No word under point" regexp-quote format "\\_<%s\\_>" "\\<%s\\>" nil evil-ex-make-search-pattern t evil-push-search-history evil-ex-delete-hl evil-ex-search evil-ex-search-next evil-ex-search-history] 10 (#$ . 40841)])
(byte-code "\301\302\303#\304\305D\203 \241\266\202 \302B\211\262B\266\207" [evil-ex-argument-types assoc substitution equal #[513 "rq\210\305\267\202& \306\307\310\311\312\313 \314\315\316	\205 \317&	\210\320\262\202& \321\307!\210\320=\205\267 \n\205\267 \211G\322V\205\267 \3231\260 \3241\247 \325\206E \326\327\"\211G\330U\203W \211A\262\242\202^ \331\332\333GD\"\211A\262\242\334\335\307\"\210\f\203w \336\f\327\"\202\200 \337\340 \341 \342\343\327%\211A\203\216 \211A\262\242\202\225 \331\332\344GD\"\211A\262\242\345\307#\266\20700\202\267 0\346\347!\262\202\267 \346\350!!\262)\207" [evil-ex-original-buffer evil-ex-substitute-interactive-replace evil-ex-substitute-highlight-all evil-ex-substitute-current-replacement evil-ex-range #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (start 10 stop 34)) evil-ex-make-hl evil-ex-substitute :face evil-ex-substitute-matches :win minibuffer-selected-window :update-hook evil-ex-pattern-update-ex-info :match-hook evil-ex-pattern-update-replacement update evil-ex-delete-hl 0 (user-error) (end-of-file) evil-ex-get-substitute-info "" t 3 signal wrong-number-of-arguments (pattern replacement _flags) nil evil-ex-hl-change evil-expand-range evil-range line-beginning-position line-end-position line :expanded (beg end &rest) evil-ex-hl-set-region evil-ex-echo "Incomplete replacement" error-message-string] 13 "\n\n(fn FLAG &optional ARG)"] nil] 4)#@44 Update the Ex info string.

(fn HL RESULT)
(defalias 'evil-ex-pattern-update-ex-info #[514 "\211;\205	 \300\301\"\207" [evil-ex-echo "%s"] 5 (#$ . 43436)])#@50 Update the replacement display.

(fn HL OVERLAY)
(defalias 'evil-ex-pattern-update-replacement #[514 "\203\f \302	?\"\202 \303\304\305G\306\307%\210\310\311#\207" [evil-ex-substitute-current-replacement case-replace evil-match-substitute-replacement "" put-text-property 0 face evil-ex-substitute-replacement overlay-put after-string] 9 (#$ . 43598)])#@49 Parse STRING as a global argument.

(fn STRING)
(defalias 'evil-ex-parse-global #[257 "\303\304\"@\211\205 GGZ\304Y\205 G\304\\\305OG\306U\203G \307=\2031 	\2031 \310	!\202E \311=\203B \nG\306U\204B \n\202E \312\313!\262D\207" [evil-search-module evil-ex-search-pattern isearch-string evil-delimited-arguments 2 nil 0 evil-search evil-ex-pattern-regex isearch user-error "No previous pattern"] 5 (#$ . 43962)])#@627 Return the substitution info of :substitute argument STRING.
The result is a triplet (PATTERN REPLACEMENT FLAGS). PATTERN is an
Ex-pattern (see `evil-ex-make-pattern') and REPLACEMENT is a compiled
replacement expression (see `evil-compile-replacement'). The
information returned is the actual substitution information w.r.t. to
special situations like empty patterns or repetition of previous
substitution commands. If IMPLICIT-R is non-nil, then the "r" flag
is assumed, i.e. in case of an empty pattern the last search pattern
is used. It is meant for :substitute commands with arguments.

(fn STRING &optional IMPLICIT-R)
(defalias 'evil-ex-get-substitute-info #[513 "\306\211\211\211\307\230\204 \310\306\311\312$\266\203\203. \262\311\313\"\203m \314\315\"\262\202m \316\317\"\211A\262\242\262\211A\262\242\262\211A\262\242\262\320\232\203U \202X \321!\262\203l \322\323\306\">\204l \324P\262\210G\315V\203\206 \315H\325U\203\206 \323\326\306O	\"\202\212 \323\306\"\262G\315U\203\325 \n\327=\203\275 \203\260 \322>\203\260 \f\205\315 \312\262\330\f!\202\315 \205\315 \312\262\330!\202\315 \312=\203\311 \202\315 \331P\262\332\322\"\262\211\203\344 \333\f!\204\344 \331P\262\203\370 \205\357 \211?\334\")\262E\207" [evil-ex-substitute-replacement evil-ex-substitute-flags evil-search-module evil-ex-last-was-search evil-ex-search-pattern evil-ex-substitute-pattern nil "" "\\`[a-zA-Z]" string-match t "[^[:space:]]+" match-string 0 evil-delimited-arguments 3 "~" evil-compile-replacement 114 append "r" 38 1 evil-search evil-ex-pattern-regex "\\C" remq evil-ex-pattern-ignore-case evil-ex-make-substitute-pattern case-fold-search isearch-string evil-ex-search-vim-style-regexp] 14 (#$ . 44392)])#@42 Disable the active search highlightings.
(defalias 'evil-ex-nohighlight #[0 "\300\301!\210\300\302!\207" [evil-ex-delete-hl evil-ex-substitute evil-ex-search] 2 (#$ . 46165) nil])#@48 Pull next word from buffer into search string.
(defalias 'evil-search-yank-word #[0 "\305 \306\307rq\210	\204 \306\230\203 \n\202 `\212	b\210`\262\310!\311\312\"\262\2036 Gu\210`\262\307v\210\313`\"*\262\314=\203X \307\315\307\316\312$\266\203)\204X \227\262c\207" [evil-ex-original-buffer evil-ex-search-yank-point evil-ex-search-start-point evil-ex-search-case case-fold-search minibuffer-contents-no-properties "" nil regexp-quote looking-at t buffer-substring-no-properties smart "[A-Z]" string-match] 11 (#$ . 46350) nil])
(provide 'evil-search)