;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\305\306\307\310\311\312\313\314&\207" [require cl-lib async pcre2el ht custom-declare-group swoop nil "Group for swoop" :prefix "swoop-" :group convenience] 8)
(defvar swoop-buffer "*Swoop*")
(defvar swoop-window nil)
(defvar swoop-overlay-buffer-selection nil)
(defvar swoop-overlay-target-buffer nil)
(defvar swoop-overlay-target-buffer-selection nil)
(defvar swoop-last-selected-buffer nil)
(defvar swoop-last-selected-line nil)
(defvar swoop-buffer-info (make-hash-table :test 'equal))
(defvar swoop-minibuffer-input-dilay 0)
(defvar swoop-input-threshold 2)
(defvar swoop-minibuffer-history nil)
(defvar swoop-last-query-plain nil)
(defvar swoop-last-query-converted nil)
(defvar swoop-last-pattern nil)
(defvar swoop-minibuf-last-content nil)
#@44 To hand over current state to swoop-multi.
(defvar swoop-parameters (make-hash-table :test 'equal) (#$ . 902))
(defvar swoop-match-beginning-line nil)
(defvar swoop-split-denominator 3000)
(defvar swoop--target-buffer nil)
(defvar swoop--target-window nil)
(defvar swoop--target-buffer-info nil)
(defvar swoop--target-last-position nil)
(defvar swoop--target-last-line nil)
(defvar swoop-map (byte-code "\301 \302\"\210\303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\317#\210\207" [minibuffer-local-map make-sparse-keymap set-keymap-parent define-key "" swoop-action-goto-line-next "" swoop-action-goto-line-prev "" swoop-action-cancel [134217788] swoop-action-goto-line-top [134217790] swoop-action-goto-line-bottom "" swoop-action-goto-target-point [C-return]] 5))
(byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\210\300\311\312\313\304\305%\210\300\314\315\316\304\305%\210\300\317\320\321\304\305%\207" [custom-declare-face swoop-face-target-line ((t :background "#e3e300" :foreground "#222222")) "Target line face" :group swoop swoop-face-target-words ((t :background "#7700ff" :foreground "#ffffff")) "Target words face" swoop-face-header-format-line ((t :height 1.3 :foreground "#999999" :weight bold)) "Currently selecting buffer name which appears on the header line" swoop-face-line-buffer-name ((t :height 1.5 :background "#0099cc" :foreground "#111111" :weight bold)) "Buffer name line face" swoop-face-line-number ((t :foreground "#ff9900")) "Line number face"] 6)
#@57 Abbreviate name in order to reduce async transfer size.
(defvar swoop-n 'swoop-face-line-number (#$ . 2481))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\305\306\307\310\311&\210\300\314\302\303\315DD\305\306\307\310\311&\210\300\316\302\303\317DD\320\306\307\310\311&\210\300\321\302\303\322DD\323\306\307\310\311&\210\300\324\302\303\325DD\326\310\327\306\307&\210\300\330\302\303\331DD\332\306\307\310\311&\210\300\333\302\303\334DD\335\306\307\310\336&\207" [custom-declare-variable swoop-use-target-magnifier: funcall function #[0 "\300\207" [nil] 1] "Magnify around target line font size." :group swoop :type boolean swoop-use-target-magnifier-around: #[0 "\300\207" [7] 1] swoop-use-target-magnifier-size: #[0 "\300\207" [1.2] 1] swoop-line-move-loop: #[0 "\300\207" [t] 1] "If the selected line is at one of the edges of the list, and move further.\nThe selected line position will be at the other side of the list." swoop-window-split-current-window: #[0 "\300\207" [nil] 1] "Split window when having multiple windows open." swoop-window-split-direction: #[0 "\300\207" [split-window-vertically] 1] "Split window direction." (choice (const :tag "vertically" split-window-vertically) (const :tag "horizontally" split-window-horizontally)) swoop-font-size-change: #[0 "\300\207" [t] 1] "Change font size temporarily during swoop." swoop-font-size: #[0 "\300\207" [0.9] 1] "Specify font size if `swoop-font-size-change:' is not nil." number] 8)
#@51 Same as `mapc'.

(fn $VARIABLE $LIST &rest $BODY)
(defalias 'swoop-mapc '(macro . #[642 "\300 \301DC\302\303CBBEE\207" [cl-gensym let mapc lambda] 10 (#$ . 3983)]))
(byte-code "\300\301\302\303#\300\207" [function-put swoop-mapc lisp-indent-function 2] 4)
#@53 Same as `mapcar'.

(fn $VARIABLE $LIST &rest $BODY)
(defalias 'swoop-mapcr '(macro . #[642 "\300 \301D\302B\303\304C\305\306\307\310\nB\311BBEEE\312BBB\207" [cl-gensym let (($results)) mapc lambda setq $results cons progn ($results) ($results)] 14 (#$ . 4252)]))
(byte-code "\300\301\302\303#\300\207" [function-put swoop-mapcr lisp-indent-function 2] 4)
#@38 Manage the target window's behavior.
(defalias 'swoop-line-move-within-target-window #[0 "\302`\303\"\302`\304\"\305\306!r\307\310\"\216\311@\312\"\210	\232\204< rq\210\313\314\"\210eb\210\211Sy\266!\210)\315!\210\202I eb\210\211Sy\266!\210\211*\207" [swoop--target-window swoop-last-selected-buffer get-text-property swl swb #[257 "\303\304 \305\245!\210\306`\307 Td^\310!$\210	\203 \311\312\"\210\n\203* \n\313\314\"\266\315\316\317!\320!\"\313\321\"\207" [swoop-overlay-target-buffer-selection swoop-use-target-magnifier: swoop-invisible-targets recenter window-height 2 move-overlay point-at-eol get-buffer swoop-magnify-around-target :$buffer mapc #[257 "\300@\301A#\207" [overlay-put invisible] 5 "\n\n(fn $OV)"] nil overlays-in overlay-start overlay-end #[257 "\301\302\"\211\205 \303\302\304#\210BB\211\207" [swoop-invisible-targets overlay-get invisible overlay-put nil] 6 "\n\n(fn $OV)"]] 7 "\n\n(fn $BUF)"] internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord set-window-buffer nil swoop-header-format-line-set] 7 (#$ . 4619)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-line-move-within-target-window speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@29 Exec goto line next action.
(defalias 'swoop-action-goto-line-next #[0 "\300\301!\207" [swoop-line-move down] 2 (#$ . 5948) nil])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-action-goto-line-next speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@29 Exec goto line prev action.
(defalias 'swoop-action-goto-line-prev #[0 "\300\301!\207" [swoop-line-move up] 2 (#$ . 6237) nil])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-action-goto-line-prev speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@28 Exec goto line top action.
(defalias 'swoop-action-goto-line-top #[0 "\300\301!\207" [swoop-line-move top] 2 (#$ . 6524) nil])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-action-goto-line-top speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@31 Exec goto line bottom action.
(defalias 'swoop-action-goto-line-bottom #[0 "\300\301!\207" [swoop-line-move bottom] 2 (#$ . 6809) nil])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-action-goto-line-bottom speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@20 Exec line forward.
(defalias 'swoop-line-forward #[0 "\301`\302\"\211\203  \303\302\"\203 \211b\207\301\302\"\303\302\"\205 \211b\207\205' \304\305!\207" [swoop-line-move-loop: next-single-property-change swl get-text-property swoop-line-move top] 5 (#$ . 7106)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-line-forward speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@21 Exec line backward.
(defalias 'swoop-line-backward #[0 "\301`\302\"\211\203  \303\302\"\203 \211b\207\301\302\"\303\302\"\205 \211b\207\205' \304\305!\207" [swoop-line-move-loop: previous-single-property-change swl get-text-property swoop-line-move bottom] 5 (#$ . 7526)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-line-backward speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@34 Exec line move.

(fn $DIRECTION)
(defalias 'swoop-line-move #[257 "\3052\373\306!r\307\310\"\216\311@\312\"\210`\313\314\267\202\214\315`\316\"\211\203C \317\316\"\2031 \211b\266\202\214\315\316\"\317\316\"\205> \211b\266\202\214	\205J \320\321!\266\202\214\322`\316\"\211\203w \317\316\"\203e \211b\266\202\214\322\316\"\317\316\"\205r \211b\266\202\214	\205~ \320\323!\266\202\214ed=\204\214eb\210\322`\316\"\211\203\264 \317\316\"\203\242 \211b\266\202\214\322\316\"\317\316\"\205\257 \211b\266\202\214	\205\273 \320\323!\266\202\214ed=\204\214db\210\315`\316\"\211\203\361 \317\316\"\203\337 \211b\266\202\214\315\316\"\317\316\"\205\354 \211b\266\202\214	\205\370 \320\321!\266\202\214o\203m\203\324\305\313\"\210\202\211o\203I\322`\316\"\211\2039\317\316\"\203'\211b\266\202B\322\316\"\317\316\"\2054\211b\266\202B	\205@\320\323!\266\325\326!\210\202\211m\203\205\315`\316\"\211\203u\317\316\"\203c\211b\266\202~\315\316\"\317\316\"\205p\211b\266\202~	\205|\320\321!\266\325\326!\210\202\211\325\326!\210\327\262`=\203\226\211\205\365\330\n`\331 Td^#\210\317`\316\"\317`\332\"\333\306!r\307\334\"\216\311@\312\"\210\f\232\204\334rq\210\335\313\"\210eb\210\211Sy\266!\210)\336!\210\202\351eb\210\211Sy\266!\210\211*\266\337\340 \341\245!\266\202*\2620\207" [swoop-window swoop-line-move-loop: swoop-overlay-buffer-selection swoop--target-window swoop-last-selected-buffer --cl-block-swoop-line-move-- internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord nil #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (up 27 down 79 top 131 bottom 192 init 253)) previous-single-property-change swl get-text-property swoop-line-move bottom next-single-property-change top throw move-beginning-of-line 1 t move-overlay point-at-eol swb #[257 "\303\304 \305\245!\210\306`\307 Td^\310!$\210	\203 \311\312\"\210\n\203* \n\313\314\"\266\315\316\317!\320!\"\313\321\"\207" [swoop-overlay-target-buffer-selection swoop-use-target-magnifier: swoop-invisible-targets recenter window-height 2 move-overlay point-at-eol get-buffer swoop-magnify-around-target :$buffer mapc #[257 "\300@\301A#\207" [overlay-put invisible] 5 "\n\n(fn $OV)"] nil overlays-in overlay-start overlay-end #[257 "\301\302\"\211\205 \303\302\304#\210BB\211\207" [swoop-invisible-targets overlay-get invisible overlay-put nil] 6 "\n\n(fn $OV)"]] 7 "\n\n(fn $BUF)"] #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] set-window-buffer swoop-header-format-line-set recenter window-height 2] 11 (#$ . 7956)])
#@39 Determine how to deploy swoop window.
(defvar swoop-display-function #[257 "\203\n 	 \210\202 \302 \203 	 \210\303\304!\210\305!\207" [swoop-window-split-current-window: swoop-window-split-direction: one-window-p other-window 1 switch-to-buffer] 3 "\n\n(fn $BUF)"] (#$ . 10681))
#@57 Change whole buffer's text size.

(fn &optional $MULTI)
(defalias 'swoop-overlay-font-size-change #[256 "\205( \304ed\"\211C\305\306\307\nD#\266\310\311 \312\245!\210\211\205( \313!\314\315\"\262\207" [swoop-font-size-change: swoop-overlay-target-buffer swoop-font-size: swoop-buffer-info make-overlay overlay-put face :height recenter window-height 2 ht-keys mapc #[257 "\232?\205 r\211q\210\303ed\"\211	B\304\305\306\nD#\262)\207" [swoop--target-buffer swoop-overlay-target-buffer swoop-font-size: make-overlay overlay-put face :height] 7 "\n\n(fn $B)"]] 7 (#$ . 10970)])
(defvar swoop-overlay-magnify-around-target-line nil)
#@152 Magnify lines around the target line.

(fn &key ($AROUND swoop-use-target-magnifier-around:) ($SIZE swoop-use-target-magnifier-size:) $DELETE $BUFFER)
(defalias 'swoop-magnify-around-target #[128 "\304\305\"\206\n \306DA@\304\307\"\206 \306	DA@\304\310\"A@\304\311\"A@\211\203P \211@\312>\2038 \211AA\262\202% \313>A@\203G \306\262\202% \314\315@\"\210\202% \210\316\n!r\317\320\"\216\321@\322\"\210\204\202 \323\324\325Z!\324!\"\326\327\330D#\210\326\331\332#\202\241 \203\220 \203\220 \333!\202\241 \334\324\325Z!\324!\335!$*\207" [swoop-use-target-magnifier-around: swoop-use-target-magnifier-size: swoop--target-window swoop-overlay-magnify-around-target-line plist-member :$around nil :$size :$delete :$buffer (:$around :$size :$delete :$buffer :allow-other-keys) :allow-other-keys error "Keyword argument %s not one of (:$around :$size :$delete :$buffer)" internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord make-overlay point-at-bol 0 overlay-put face :height priority 100 delete-overlay move-overlay get-buffer] 12 (#$ . 11618)])
#@51 Do `goto-line' considering narrowing.

(fn $LINE)
(defalias 'swoop-goto-line #[257 "eb\210\211Sy\207" [] 2 (#$ . 12783)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-goto-line speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@11 Recenter.
(defalias 'swoop-recenter #[0 "\300\301 \302\245!\207" [recenter window-height 2] 3 (#$ . 13052)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-recenter speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@31 Boblp.

(fn &optional $POINT)
(defalias 'swoop-boblp #[256 "\212eb\210\300 \206 `b\210\300 )=\207" [line-number-at-pos] 3 (#$ . 13307)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-boblp speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@31 Eoblp.

(fn &optional $POINT)
(defalias 'swoop-eoblp #[256 "\212db\210\300 \206 `b\210\300 )=\207" [line-number-at-pos] 3 (#$ . 13589)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-eoblp speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@44 Header format line set.

(fn $BUFFER-NAME)
(defalias 'swoop-header-format-line-set #[257 "\211;\205 \302!r\303\304\"\216\305@\306\"\210\307\310\311#\211*\262\207" [swoop-window header-line-format internal--before-with-selected-window make-closure #[0 "\301\300!\207" [V0 internal--after-with-selected-window] 2] select-window norecord propertize face swoop-face-header-format-line] 6 (#$ . 13871)])
(defvar swoop-use-pcre nil)
#@28 Pcre convert.

(fn $QUERY)
(defalias 'swoop-pcre-convert #[257 "\300\301\302#\303C\304\305\306\"\"\210\211\242\266\202\237\207" [split-string " " t nil mapc make-closure #[257 "\300\301!\300\242B\240\207" [V0 rxt-pcre-to-elisp] 4 "\n\n(fn $Q)"]] 7 (#$ . 14311)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-pcre-convert speed -1 put byte-optimizer byte-compile-inline-expand] 5)
(defvar swoop-use-migemo nil)
(defvar swoop-migemo-options "-q -e -d /usr/local/share/migemo/utf-8/migemo-dict")
#@30 Convert migemo.

(fn $QUERY)
(defalias 'swoop-migemo-convert #[257 "\300\301!\203 \302\303\304#\305C\306\307\310\"\"\210\211\242\266\202\237\207\311\312!\207" [executable-find "cmigemo" split-string " " t nil mapc make-closure #[257 "\300\302\303\304\305\306\307	R!#\300\242B\240\207" [V0 swoop-migemo-options replace-regexp-in-string "\n" "" shell-command-to-string "cmigemo -w " " "] 10 "\n\n(fn $Q)"] error "cmigemo not found..."] 7 (#$ . 14841)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-migemo-convert speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@29 Convert input.

(fn $INPUT)
(defalias 'swoop-convert-input #[257 "\203 	\204 \211\302\303\304#\305C\306\307\310\"\"\210\211\242\266\202\237\207	\203F \204F \211\311\312!\203B \302\303\304#\305C\306\307\313\"\"\210\211\242\266\202\237\207\314\315!\207\316\317\"\203P \305\262\316\320\"\203Z \305\262\316\321\"\203d \305\262\207" [swoop-use-pcre swoop-use-migemo split-string " " t nil mapc make-closure #[257 "\300\301!\300\242B\240\207" [V0 rxt-pcre-to-elisp] 4 "\n\n(fn $Q)"] executable-find "cmigemo" #[257 "\300\302\303\304\305\306\307	R!#\300\242B\240\207" [V0 swoop-migemo-options replace-regexp-in-string "\n" "" shell-command-to-string "cmigemo -w " " "] 10 "\n\n(fn $Q)"] error "cmigemo not found..." string-match "^\\\\b$" "[^\\]\\\\$" "\\[[^]]*$"] 8 (#$ . 15450)])
(defvar swoop-invisible-targets nil)
#@27 Restore unveiled overlay.
(defalias 'swoop-restore-unveiled-overlay #[0 "\205 \301\302\"\266\303\211\207" [swoop-invisible-targets mapc #[257 "\300@\301A#\207" [overlay-put invisible] 5 "\n\n(fn $OV)"] nil] 4 (#$ . 16287)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-restore-unveiled-overlay speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@141 Show hidden text temporarily to view it during swoop.
This function needs to call after latest
swoop-overlay-target-buffer-selection moved.
(defalias 'swoop-unveil-invisible-overlay #[0 "\203 \302\303\"\266\304\305\306	!\307	!\"\302\310\"\207" [swoop-invisible-targets swoop-overlay-target-buffer-selection mapc #[257 "\300@\301A#\207" [overlay-put invisible] 5 "\n\n(fn $OV)"] nil overlays-in overlay-start overlay-end #[257 "\301\302\"\211\205 \303\302\304#\210BB\211\207" [swoop-invisible-targets overlay-get invisible overlay-put nil] 6 "\n\n(fn $OV)"]] 4 (#$ . 16682)])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-unveil-invisible-overlay speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@71 Collect buffers information.  It's used for multiple uses.

(fn $BUF)
(defalias 'swoop-set-buffer-info #[257 "r\211q\210\303ed\"`ed\304!\305!G\306\305!\307Q\245\246\211\310=\203) \202+ T\311\312P\310\211W\203w \211\313\212_Teb\210\211Sy\266`)ST\f_Y?\205j \212T\f_Teb\210\211Sy\266`)S#B\262\210\211T\262\2022 \266\314\315\316\"\317\320\237#\210\317\321#\210\317\322#\210\317\323\f#\210\317\324#\210\317\325\n#\210\317\326	#\210\317\327#\210\317\330#\210\211\262\317	\n#\266)\311\207" [swoop-split-denominator swoop--target-buffer-info swoop-buffer-info buffer-substring-no-properties line-number-at-pos number-to-string "%0" "s: " 0 nil "\n" substring-no-properties make-hash-table :test equal puthash "buf-separated" "buf-number" "point" "point-min" "point-max" "max-line" "max-line-digit" "line-format" "divide-by"] 22 (#$ . 17435)])
#@52 Regexp to eliminate buffers you don't want to see.
(defvar swoop-multi-ignore-buffers-match "^\\*" (#$ . 18333))
(defalias 'swoop-multi-get-buffer-list #[0 "\300C\300C\301\302\303\"\304 \"\210\301\302\305\"\242\"\210\211\242\207" [nil mapc make-closure #[257 "\302!\262\303\304\"?\205 r\211q\210	)\305=?\205 \300\300\242B\240\207" [V0 major-mode buffer-name string-match "^\\s-" dired-mode] 4 "\n\n(fn $BUF)"] buffer-list #[257 "\302	\"?\205 \300\300\242B\240\207" [V0 swoop-multi-ignore-buffers-match string-match] 4 "\n\n(fn $BUF)"]] 6])
(defalias 'swoop-set-buffer-info-all #[0 "\301 \211\302\303\"\266\304!\302\305\306\"\"\207" [swoop-buffer-info swoop-multi-get-buffer-list mapc #[257 "\211\301!\235\203 r\211q\210\302 )\205 \303!\207\303!\207" [swoop-buffer-info ht-keys buffer-modified-p swoop-set-buffer-info] 4 "\n\n(fn $BUF)"] ht-keys make-closure #[257 "\211\300\235?\205 \302	\"\207" [V0 swoop-buffer-info remhash] 4 "\n\n(fn $BUF)"]] 6])
#@19 

(fn $BUF $KEY2)
(defalias 'swoop-buffer-info-get #[514 "\301\301\302#\302#\207" [swoop-buffer-info gethash nil] 8 (#$ . 19314)])
#@13 

(fn $KEY)
(defalias 'swoop-buffer-info-get-map #[257 "\301\302\303\"\"\207" [swoop-buffer-info ht-map make-closure #[514 "\301\300\302#\207" [V0 gethash nil] 6 "\n\n(fn IGNORED $BINFO)"]] 5 (#$ . 19454)])
#@72 Return the nearest number of $target out of $list.

(fn $TARGET $LIST)
(defalias 'swoop-nearest-line #[514 "\205\237 \211\205\237 \300\301G\302=\203 @\266\202\202\234 \211\303#\304#\205, \305\306\"\2054 \305\307\"\205< Z\205D 	Z		>\203S 	\266\210\202\234 \204a \204a \266\300\202\234 \211\204k \266\210\202\234 \204u \266\210\202\234 =\203\201 \266\210\202\234 W\203\215 \266\210\202\234 V\203\231 \266\210\202\234 \266\302\211\262\207" [nil #[771 "\300C\301\302\303$\"\210\211\242\207" [nil mapc make-closure #[257 "\300\301\"\205 \302\302\242B\240\207" [V0 V1 V2] 4 "\n\n(fn $E)"]] 10 "\n\n(fn $FN $ELEM $LIST)"] 1 > < apply max min] 12 (#$ . 19670)])
(defvar swoop-async-pool (make-hash-table :test 'equal))
(defvar swoop-async-id-latest nil)
(defvar swoop-async-id-last nil)
(defvar swoop-async-get-match-lines-list "Byte compiled function. It works in async process.")
(defalias 'swoop-async-old-session\? #[0 "	\232?\207" [swoop-async-id-last swoop-async-id-latest] 2])
(byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put swoop-async-old-session\? speed -1 put byte-optimizer byte-compile-inline-expand] 5)
#@33 

(fn $START-FUNC $FINISH-FUNC)
(defalias 'swoop-async-start '(macro . #[514 "\300\301!\210\302\303!\304\305D\306\307\310\311\312\313\314\315\"\316BBBBBBBDD\317\320\321\322BBEF\207" [require find-func make-symbol "proc" let* sexp swoop-async-start-process "swoop-batch" (file-truename (expand-file-name invocation-name invocation-directory)) "-Q" "-l" symbol-file async-batch-invoke defun ("-batch" "-f" "async-batch-invoke" (if async-send-over-pipe "<none>" (with-temp-buffer (async--insert-sexp (list 'quote sexp)) (buffer-string)))) if async-send-over-pipe async--transmit-sexp ((list 'quote sexp))] 15 (#$ . 20855)]))
#@52 

(fn NAME PROGRAM FINISH-FUNC &rest PROGRAM-ARGS)
(defalias 'swoop-async-start-process #[899 "\303\304\304Q!\305\306\307%)rq\210\310\301!\210\311\312\"\210\313\230\204. \310\302!\210\314)\207" [process-connection-type async-callback async-callback-for-process generate-new-buffer "*" nil apply start-process make-local-variable set-process-sentinel async-when-done "swoop-batch" t] 11 (#$ . 21489)])
(defalias 'swoop-async-kill-process-buffer #[0 "\300\301\302 \"\207" [mapc #[257 "\301!\262\302\303\"\205 \304\305!)\207" [kill-buffer-query-functions buffer-name string-match "^\\*swoop-batch\\*" nil kill-buffer] 4 "\n\n(fn $BUF)"] buffer-list] 3])
(defalias 'swoop-async-kill-process #[0 "\300\301\302 \"\207" [mapc #[257 "\300\301\302!\"\205\f \303!\207" [string-match "swoop-batch" process-name delete-process] 5 "\n\n(fn $PROC)"] process-list] 3])
#@124 Distributed processing by async.el.

(fn $QUERY $FROM $LINE-FORMAT $LINE-FACE $BUF &optional $PRE-SELECT $MATCH-BEGINNING)
(defalias 'swoop-async-get-match-lines-list #[1797 "\302\212\302Ced\302\211C\205& \303!\304\305\302\306\307\310#\"\"\311\"C\262C\302\2031 \312\2022 \313b\210\314\315$\210\316\307\317%\"\210\302C\242G\211\320V\203q \242\242\240\210\211\321V\203q \316\307\322\"\242A\"\210\242\262\266\316\307\323\f\f&\"\210\306\307\324\"\"\262\242)B\266\207)\207" [vc-handled-backends buffer-invisibility-spec nil line-number-at-pos sort delq mapcar make-closure #[257 "\211\300V\205 \211\301\300\\X\205 \211\300Z\207" [V0 V1] 4 "\n\n(fn $N)"] > #[0 "\300\301\224!\207" [line-number-at-pos 0] 2] #[0 "\300 \207" [line-number-at-pos] 1] put-text-property swb mapc #[257 "\212\300b\210\304\305\306#\203 \301\303 \301\242B\240\210\305y\210\202 \302\301\242\302\242B\240\210\301\305\240)\207" [V0 V1 V2 V3 re-search-forward nil t] 5 "\n\n(fn $Q)"] 0 1 #[257 "\300\301\302\300\242\203$ \300\242@\211>\203 \211B\262\210\211T\262\300\211\242A\240\210\202 \237\266\202\240\207" [V0 nil 0] 7 "\n\n(fn $L)"] #[257 "\304b\210\211Sy\210\211\300\\\303\305`\306 T{\307\305\310\301\"\311\302#\312%\303\242B\240\207" [V0 V1 V2 V3 V4 propertize point-at-eol line-prefix format face swl] 10 "\n\n(fn $L)"] #[257 "\211\300\\\207" [V0] 3 "\n\n(fn $LN)"]] 23 (#$ . 22373)])
(byte-code "\301\300!\301\207" [swoop-async-get-match-lines-list byte-compile] 2)
#@42 Overlay match words.

(fn $PATTERN $BUF)
(defalias 'swoop-overlay-word #[514 "\3022N r\211q\210\212eb\210\303d!\210\304\305\306#\205L 	\232\204# \307\310\305\"\210\311\224\311\225\312\"=\2036 \307\302\305\"\210\313\314\315#\210\313\316\306#\210\313\317\320#\266\202 *0\207" [swoop-async-id-last swoop-async-id-latest --cl-block-swoop-overlay-word-- overlay-recenter re-search-forward nil t throw --cl-block-stop1-- 0 make-overlay overlay-put face swoop-face-target-words swoop-temporary priority 20] 9 (#$ . 23892)])
(provide 'swoop-lib)